Remove wrong lock support on resize-rect func.

This commit is contained in:
Andrey Antukh
2017-01-11 20:51:08 +01:00
parent 6345cfd91a
commit 3cd3230342

View File

@@ -269,12 +269,9 @@
(defn- resize-rect
"A specialized function for absolute resize
for rect-like shapes."
[shape {:keys [x y lock] :as pos}]
(if lock
(-> (assoc shape :x2 x :y2 y)
(equalize-sides)
(normalize-shape))
(normalize-shape (assoc shape :x2 x :y2 y))))
[shape {:keys [x y] :as pos}]
(-> (assoc shape :x2 x :y2 y)
(normalize-shape)))
(defn- resize-circle
"A specialized function for absolute resize