Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-27 00:49:28 -05:00
Code Issues Activity

Cosmetic changes on drawarea ns.

Browse source
This commit is contained in:
Andrey Antukh 2016-08-01 20:54:11 +03:00
parent 56d64cf737
commit ffa9d0e8d1
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95
1 changed files with 13 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

32
src/uxbox/main/ui/workspace/drawarea.cljs
View file

@ -7,18 +7,17 @@
(ns uxbox.main.ui.workspace.drawarea
(:require [sablono.core :as html :refer-macros [html]]
[rum.core :as rum]
[beicon.core :as rx]
[lentes.core :as l]
[uxbox.main.constants :as c]
[uxbox.util.rstore :as rs]
[uxbox.util.mixins :as mx :include-macros true]
[uxbox.main.constants :as c]
[uxbox.main.state :as st]
[uxbox.main.data.workspace :as udw]
[uxbox.main.data.shapes :as uds]
[uxbox.main.ui.core :as uuc]
[uxbox.main.ui.shapes :as shapes]
[uxbox.main.ui.workspace.base :as wb]
[uxbox.util.mixins :as mx]
[uxbox.main.geom :as geom]
[uxbox.main.geom.point :as gpt]
[uxbox.util.dom :as dom]))
@ -32,15 +31,6 @@
(declare watch-draw-actions)
(defn- draw-area-render
[own]
(let [shape (mx/react drawing-shape)
position (mx/react drawing-position)]
(when (and shape position)
(-> (assoc shape :drawing? true)
(geom/resize position)
(shapes/render-component)))))
(defn- draw-area-will-mount
[own]
(assoc own ::sub (watch-draw-actions)))
@ -50,13 +40,17 @@
(.close (::sub own))
(dissoc own ::sub))
(def draw-area
(mx/component
{:render draw-area-render
:name "draw-area"
:will-mount draw-area-will-mount
:will-unmount draw-area-will-unmount
:mixins [mx/static mx/reactive]}))
(mx/defc draw-area
{:will-mount draw-area-will-mount
:will-unmount draw-area-will-unmount
:mixins [mx/static mx/reactive]}
[own]
(let [shape (mx/react drawing-shape)
position (mx/react drawing-position)]
(when (and shape position)
(-> (assoc shape :drawing? true)
(geom/resize position)
(shapes/render-component)))))
;; --- Drawing Logic