3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-07-27 06:17:16 +02:00
Code Issues Projects Releases Packages Wiki Activity

🚧 More work on rotation related stuff.

Browse source
This commit is contained in:
Andrey Antukh 2020-01-15 17:59:55 +01:00
parent 79a91605d3
commit 72d92c419f
9 changed files with 333 additions and 299 deletions
Download patch file Download diff file Expand all files Collapse all files

21
frontend/src/uxbox/main/ui/shapes/rect.cljs
View file

@ -32,13 +32,6 @@
;; --- Rect Shape
(defn- rotate
[mt {:keys [x1 y1 x2 y2 width height rotation] :as shape}]
(let [x-center (+ x1 (/ width 2))
y-center (+ y1 (/ height 2))
center (gpt/point x-center y-center)]
(gmt/rotate* mt rotation center)))
(mf/defc rect-shape
[{:keys [shape] :as props}]
(let [{:keys [id rotation modifier-mtx]} shape
@ -49,18 +42,16 @@
{:keys [x y width height]} shape
;; transform (when (pos? rotation)
;; (str (rotate (gmt/matrix) shape)))
transform (str/format "rotate(%s %s %s)"
rotation
(+ x (/ width 2))
(+ y (/ height 2)))
transform (when (and rotation (pos? rotation))
(str/format "rotate(%s %s %s)"
rotation
(+ x (/ width 2))
(+ y (/ height 2))))
props (-> (attrs/extract-style-attrs shape)
(assoc :x x
:y y
;; :transform transform
:transform transform
:id (str "shape-" id)
:width width
:height height