mirror of
https://github.com/penpot/penpot.git
synced 2026-05-23 08:53:39 +00:00
🔥 Remove commented code.
This commit is contained in:
parent
b1d13b3d42
commit
007ee0de5e
@ -202,7 +202,6 @@
|
|||||||
user (if (string? (:color user))
|
user (if (string? (:color user))
|
||||||
user
|
user
|
||||||
(assoc user :color color))]
|
(assoc user :color color))]
|
||||||
(prn "assign-user-color" user-id)
|
|
||||||
(assoc-in state [:workspace-users :by-id user-id] user)))
|
(assoc-in state [:workspace-users :by-id user-id] user)))
|
||||||
|
|
||||||
(defn handle-who
|
(defn handle-who
|
||||||
@ -211,7 +210,6 @@
|
|||||||
(ptk/reify ::handle-who
|
(ptk/reify ::handle-who
|
||||||
ptk/UpdateEvent
|
ptk/UpdateEvent
|
||||||
(update [_ state]
|
(update [_ state]
|
||||||
(prn "handle-who" users)
|
|
||||||
(as-> state $$
|
(as-> state $$
|
||||||
(assoc-in $$ [:workspace-users :active] users)
|
(assoc-in $$ [:workspace-users :active] users)
|
||||||
(reduce assign-user-color $$ users)))))
|
(reduce assign-user-color $$ users)))))
|
||||||
@ -234,7 +232,6 @@
|
|||||||
(watch [_ state stream]
|
(watch [_ state stream]
|
||||||
(let [local (:workspace-local state)]
|
(let [local (:workspace-local state)]
|
||||||
(when (= (:page-id local) page-id)
|
(when (= (:page-id local) page-id)
|
||||||
(prn "handle-page-snapshot" msg)
|
|
||||||
(rx/of (shapes-changes-commited msg)))))))
|
(rx/of (shapes-changes-commited msg)))))))
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
@ -989,7 +986,6 @@
|
|||||||
:version (:version page)
|
:version (:version page)
|
||||||
:operations operations}]
|
:operations operations}]
|
||||||
(->> (rp/mutation :update-project-page params)
|
(->> (rp/mutation :update-project-page params)
|
||||||
(rx/tap #(prn "KAKAKAKA" %))
|
|
||||||
(rx/map shapes-changes-commited))))))
|
(rx/map shapes-changes-commited))))))
|
||||||
|
|
||||||
(s/def ::shapes-changes-commited
|
(s/def ::shapes-changes-commited
|
||||||
@ -997,7 +993,6 @@
|
|||||||
|
|
||||||
(defn shapes-changes-commited
|
(defn shapes-changes-commited
|
||||||
[{:keys [page-id version operations] :as params}]
|
[{:keys [page-id version operations] :as params}]
|
||||||
(prn "shapes-changes-commited" params)
|
|
||||||
(s/assert ::shapes-changes-commited params)
|
(s/assert ::shapes-changes-commited params)
|
||||||
(ptk/reify ::shapes-changes-commited
|
(ptk/reify ::shapes-changes-commited
|
||||||
ptk/UpdateEvent
|
ptk/UpdateEvent
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user