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

WIP: partial grid.

Browse source
This commit is contained in:
Andrey Antukh 2015-12-17 15:44:05 +02:00
parent 64c9360b38
commit a2c313dfc0
6 changed files with 266 additions and 60 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -15,9 +15,20 @@
(reify
rs/UpdateEvent
(-apply-update [_ state]
(println "KAKAKA" (get-in state [:workspace :visible-pagebar]))
(update-in state [:workspace :visible-pagebar] (fnil not false)))
(update-in state [:workspace :pagesbar-enabled] (fnil not false)))
IPrintWithWriter
(-pr-writer [mv writer _]
(-write writer "#<event:u.s.p/toggle-pagebar>"))))
(defn toggle-grid
[]
(reify
rs/UpdateEvent
(-apply-update [_ state]
(println "toggle-grid")
(update-in state [:workspace :grid-enabled] (fnil not false)))
IPrintWithWriter
(-pr-writer [mv writer _]
(-write writer "#<event:u.s.p/toggle-grid>"))))