0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-07 15:39:42 -05:00

Move coordinates element to main workspace ns.

This commit is contained in:
Andrey Antukh 2015-12-28 15:26:22 +02:00
parent 6952d21af2
commit fc03388d70
2 changed files with 22 additions and 22 deletions

View file

@ -7,14 +7,34 @@
[uxbox.data.workspace :as dw]
[uxbox.ui.util :as util]
[uxbox.ui.mixins :as mx]
[uxbox.ui.workspace.shortcuts :as wshortcuts]
[uxbox.ui.workspace.base :as wb]
[uxbox.ui.workspace.shortcuts :as wshortcuts]
[uxbox.ui.workspace.lateralmenu :refer (lateralmenu)]
[uxbox.ui.workspace.pagesmngr :refer (pagesmngr)]
[uxbox.ui.workspace.header :refer (header)]
[uxbox.ui.workspace.rules :refer (h-rule v-rule)]
[uxbox.ui.workspace.sidebar :refer (aside)]
[uxbox.ui.workspace.workarea :refer (viewport coordinates)]))
[uxbox.ui.workspace.workarea :refer (viewport)]))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Coordinates Debug
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defn- coordenates-render
[own]
(let [[x y] (rum/react wb/mouse-position)]
(html
[:div {:style {:position "absolute" :left "80px" :top "20px"}}
[:table
[:tbody
[:tr [:td "X:"] [:td x]]
[:tr [:td "Y:"] [:td y]]]]])))
(def coordinates
(util/component
{:render coordenates-render
:name "coordenates"
:mixins [rum/reactive]}))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Workspace

View file

@ -10,26 +10,6 @@
[uxbox.ui.workspace.grid :refer (grid)]
[uxbox.ui.workspace.base :as wb]))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Coordinates Debug
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defn- coordenates-render
[own]
(let [[x y] (rum/react wb/mouse-position)]
(html
[:div {:style {:position "absolute" :left "80px" :top "20px"}}
[:table
[:tbody
[:tr [:td "X:"] [:td x]]
[:tr [:td "Y:"] [:td y]]]]])))
(def coordinates
(util/component
{:render coordenates-render
:name "coordenates"
:mixins [rum/reactive]}))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Viewport
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;