Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-23 06:58:58 -05:00
Code Issues Activity

🐛 Fix problem with flip properties

Browse source
This commit is contained in:
alonso.torres 2024-04-03 10:27:48 +02:00
parent b258b05fb2
commit 5fd72cf9d9
2 changed files with 9 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
common/src/app/common/geom/shapes/transforms.cljc
View file

@ -299,12 +299,16 @@
(cond-> shape (cond-> shape
(neg? dot-x) (neg? dot-x)
(-> (cr/update! :flip-x not) (cr/update! :flip-x not)
(cr/update! :rotation -))
(neg? dot-x)
(cr/update! :rotation -)
(neg? dot-y) (neg? dot-y)
(-> (cr/update! :flip-y not) (cr/update! :flip-y not)
(cr/update! :rotation -)))))
(neg? dot-y)
(cr/update! :rotation -))))
(defn- apply-transform-move (defn- apply-transform-move
"Given a new set of points transformed, set up the rectangle so it keeps "Given a new set of points transformed, set up the rectangle so it keeps

2
common/src/app/common/types/shape.cljc
View file

@ -31,7 +31,7 @@
[app.common.uuid :as uuid] [app.common.uuid :as uuid]
[clojure.set :as set])) [clojure.set :as set]))
(cr/defrecord Shape [id name type x y width height rotation selrect points transform transform-inverse parent-id frame-id]) (cr/defrecord Shape [id name type x y width height rotation selrect points transform transform-inverse parent-id frame-id flip-x flip-y])
(defn shape? (defn shape?
[o] [o]