Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-22 14:39:45 -05:00
Code Issues Activity

Remove unused code from workspace data ns.

Browse source
This commit is contained in:
Andrey Antukh 2015-12-28 20:39:34 +02:00
parent 311d107b36
commit dd94224383
1 changed files with 0 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
frontend/uxbox/data/workspace.cljs
View file

@ -123,21 +123,8 @@
(-apply-update [_ state]
;; (println "apply-delta" shapeid delta)
(let [pageid (get-in state [:workspace :page])
_ (assert pageid)
shape (get-in state [:pages-by-id pageid :shapes-by-id shapeid])]
(update-in state [:pages-by-id pageid :shapes-by-id shapeid] merge
{:x (+ (:x shape) dx)
:y (+ (:y shape) dy)})))))
;; (defn apply-delta'
;; "Mark a shape selected for drawing in the canvas."
;; [shapeid [dx dy :as delta]]
;; (reify
;; rs/UpdateEvent
;; (-apply-update [_ state]
;; ;; (println "apply-delta'" shapeid delta)
;; (let [pageid (get-in state [:workspace :page])
;; shape (get-in state [:pages-by-id pageid :shapes-by-id shapeid])]
;; (update-in state [:pages-by-id pageid :shapes-by-id shapeid] merge
;; {:x dx :y dy})))))