3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-21 09:56:12 +02:00
Code Issues Projects Releases Packages Wiki Activity

Reactivate again the layer position shortcuts.

Browse source
This commit is contained in:
Andrey Antukh 2016-12-25 20:58:17 +01:00
parent c0a81d05eb
commit 6801cc65af
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95
2 changed files with 23 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

20
frontend/src/uxbox/main/data/shapes.cljs
View file

@ -656,14 +656,22 @@
(->> (get-in state [:workspace :selected])
(map #(update-stroke-attrs % opts)))))))
;; --- Move Selected Layer
(s/def ::direction #{:up :down})
(deftype MoveSelectedLayer [loc]
udp/IPageUpdate
ptk/UpdateEvent
(update [_ state]
(let [selected (get-in state [:workspace :selected])]
(impl/move-layer state selected loc))))
(defn move-selected-layer
[loc]
(reify
udp/IPageUpdate
ptk/UpdateEvent
(update [_ state]
(let [selected (get-in state [:workspace :selected])]
(impl/move-layer state selected loc)))))
{:pre [(us/valid? ::direction loc)]}
(MoveSelectedLayer. loc))
;; --- Point Alignment (with Grid)

17
frontend/src/uxbox/main/ui/workspace/shortcuts.cljs
View file

@ -50,14 +50,15 @@
:ctrl+down #(st/emit! (uds/move-selected-layer :down))
:ctrl+shift+up #(st/emit! (uds/move-selected-layer :top))
:ctrl+shift+down #(st/emit! (uds/move-selected-layer :bottom))
:shift+up #(move-selected :up :fast)
:shift+down #(move-selected :down :fast)
:shift+right #(move-selected :right :fast)
:shift+left #(move-selected :left :fast)
:up #(move-selected :up :std)
:down #(move-selected :down :std)
:right #(move-selected :right :std)
:left #(move-selected :left :std)})
;; :shift+up #(move-selected :up :fast)
;; :shift+down #(move-selected :down :fast)
;; :shift+right #(move-selected :right :fast)
;; :shift+left #(move-selected :left :fast)
;; :up #(move-selected :up :std)
;; :down #(move-selected :down :std)
;; :right #(move-selected :right :std)
;; :left #(move-selected :left :std)
})
;; --- Shortcuts Setup Functions