0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-03 21:09:00 -05:00

Maintain proportions when control key is pressed

This commit is contained in:
alonso.torres 2020-04-27 07:55:30 +02:00
parent 9f351ef155
commit 285be7f5ff
3 changed files with 10 additions and 5 deletions

View file

@ -84,6 +84,8 @@
;; Resize vector
scalev (gpt/divide (gpt/add shapev deltav) shapev)
scalev (if lock? (let [v (max (:x scalev) (:y scalev))] (gpt/point v v)) scalev)
shape-transform (:transform shape (gmt/matrix))
shape-transform-inverse (:transform-inverse shape (gmt/matrix))

View file

@ -120,7 +120,8 @@
(let [shape' (geom/shape->rect-shape shape)
shapev (gpt/point (:width shape') (:height shape'))
deltav (gpt/subtract point initial)
scalev (gpt/divide (gpt/add shapev deltav) shapev)]
scalev (gpt/divide (gpt/add shapev deltav) shapev)
scalev (if lock? (let [v (max (:x scalev) (:y scalev))] (gpt/point v v)) scalev)]
(-> shape
(assoc-in [:modifiers :resize-vector] scalev)

View file

@ -1,5 +1,7 @@
(ns uxbox.util.debug
"Debugging utils")
"Debugging utils"
(:require
[uxbox.main.store :as store]))
(def debug-options #{:bounding-boxes :group :events #_:simple-selection})
@ -30,8 +32,8 @@
val))
(defn dump-state []
(logjs "state" @uxbox.main.store/state))
(logjs "state" @store/state))
(defn dump-objects []
(let [page-id (get @uxbox.main.store/state :page-id)]
(logjs "state" (get-in @uxbox.main.store/state [:workspace-data page-id :objects]))))
(let [page-id (get @store/state :page-id)]
(logjs "state" (get-in @store/state [:workspace-data page-id :objects]))))