3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-03 14:41:37 +02:00
Code Issues Projects Releases Packages Wiki Activity

✨ Allow canvas movement and resize.

Browse source
This commit is contained in:
Andrey Antukh 2019-08-24 16:01:17 +02:00
parent 902f7c4181
commit daac4486e5
7 changed files with 16 additions and 73 deletions
Download patch file Download diff file Expand all files Collapse all files

18
frontend/src/uxbox/main/ui/shapes/common.cljs
View file

@ -35,30 +35,36 @@
(rx/take-until stoper))
(rx/of (dw/materialize-current-modifier id)))))))
(defn start-move-selected
[]
(def start-move-selected
(reify
ptk/WatchEvent
(watch [_ state stream]
(let [pid (get-in state [:workspace :current])
selected (get-in state [:workspace pid :selected])]
(prn "start-move-selected" selected)
(rx/from-coll (map start-move selected))))))
(defn on-mouse-down
[event {:keys [id] :as shape} selected]
[event {:keys [id type] :as shape} selected]
(let [selected? (contains? selected id)
drawing? @refs/selected-drawing-tool]
(prn "on-mouse-down" id type selected? (= type :canvas))
(when-not (:blocked shape)
(cond
drawing?
nil
(= type :canvas)
(when selected?
(dom/stop-propagation event)
(st/emit! start-move-selected))
(and (not selected?) (empty? selected))
(do
(dom/stop-propagation event)
(st/emit! (dw/deselect-all)
(dw/select-shape id)
(start-move-selected)))
start-move-selected))
(and (not selected?) (not (empty? selected)))
(do
@ -67,8 +73,8 @@
(st/emit! (dw/select-shape id))
(st/emit! (dw/deselect-all)
(dw/select-shape id)
(start-move-selected))))
start-move-selected)))
:else
(do
(dom/stop-propagation event)
(st/emit! (start-move-selected)))))))
(st/emit! start-move-selected))))))

1
frontend/src/uxbox/main/ui/shapes/rect.cljs
View file

@ -25,7 +25,6 @@
(let [selected (mf/deref refs/selected-shapes)
selected? (contains? selected (:id shape))
on-mouse-down #(common/on-mouse-down % shape selected)]
;; shape (assoc shape :modifiers modifiers)]
[:g.shape {:class (when selected? "selected")
:on-mouse-down on-mouse-down}
[:& rect-shape {:shape shape}]]))