Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-26 08:45:34 -05:00
Code Issues Activity

Show ugly marker on available interaction when interaction flag is activated.

Browse source 
Deactivated by default and requires a designer review.
This commit is contained in:
Andrey Antukh 2016-07-30 23:38:58 +03:00
parent d6cd45c6da
commit 955b864da5
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95
1 changed files with 17 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
src/uxbox/view/ui/viewer/shapes.cljs
View file

@ -6,8 +6,10 @@
(ns uxbox.view.ui.viewer.shapes
(:require [goog.events :as events]
[lentes.core :as l]
[uxbox.util.mixins :as mx :include-macros true]
[uxbox.main.state :as st]
[uxbox.main.geom :as geom]
[uxbox.main.ui.shapes.rect :refer (rect-shape)]
[uxbox.main.ui.shapes.icon :refer (icon-shape)]
[uxbox.main.ui.shapes.text :refer (text-shape)]
@ -17,6 +19,10 @@
[uxbox.view.ui.viewer.interactions :as itx])
(:import goog.events.EventType))
(def itx-flag-ref
(-> (comp (l/key :flags) (l/lens :interactions))
(l/derive st/state)))
;; --- Interactions Wrapper
(defn- interactions-wrapper-did-mount
@ -38,9 +44,18 @@
(mx/defc interactions-wrapper
{:did-mount interactions-wrapper-did-mount
:will-unmount interactions-wrapper-will-unmount}
:will-unmount interactions-wrapper-will-unmount
:mixins [mx/reactive mx/static]}
[shape factory]
[:g {:id (str "itx-" (:id shape))} (factory shape)])
(let [show-itx? (mx/react itx-flag-ref)
rect (geom/inner-rect shape)]
[:g {:id (str "itx-" (:id shape))}
(factory shape)
(when show-itx?
[:circle {:fill "red"
:cx (:x rect)
:cy (:y rect)
:r 10}])]))
;; --- Shapes