mirror of
https://github.com/penpot/penpot.git
synced 2025-02-13 10:38:13 -05:00
commit
13773d829a
2 changed files with 26 additions and 18 deletions
|
@ -171,13 +171,13 @@
|
|||
|
||||
handle-blur
|
||||
(mf/use-callback
|
||||
(mf/deps parse-value apply-value update-input on-blur)
|
||||
(fn [_]
|
||||
(let [new-value (or (parse-value) default-val)]
|
||||
(if new-value
|
||||
(apply-value new-value)
|
||||
(update-input new-value)))
|
||||
(when on-blur (on-blur))))
|
||||
(mf/deps parse-value apply-value update-input on-blur)
|
||||
(fn [_]
|
||||
(let [new-value (or (parse-value) default-val)]
|
||||
(if new-value
|
||||
(apply-value new-value)
|
||||
(update-input new-value)))
|
||||
(when on-blur (on-blur))))
|
||||
|
||||
on-click
|
||||
(mf/use-callback
|
||||
|
@ -203,8 +203,7 @@
|
|||
(mf/deps value-str)
|
||||
(fn []
|
||||
(when-let [input-node (mf/ref-val ref)]
|
||||
(when-not (dom/active? input-node)
|
||||
(dom/set-value! input-node value-str)))))
|
||||
(dom/set-value! input-node value-str))))
|
||||
|
||||
(mf/use-effect
|
||||
(mf/deps handle-blur)
|
||||
|
|
|
@ -49,17 +49,26 @@
|
|||
|
||||
[width height]
|
||||
(if (or resize-x? resize-y?)
|
||||
(let [pc (-> (gpt/point x y)
|
||||
(gpt/transform transform)
|
||||
(gpt/transform current-transform))
|
||||
(let [pc (cond-> (gpt/point x y)
|
||||
(some? transform)
|
||||
(gpt/transform transform)
|
||||
|
||||
pw (-> (gpt/point (+ x width) y)
|
||||
(gpt/transform transform)
|
||||
(gpt/transform current-transform))
|
||||
(some? current-transform)
|
||||
(gpt/transform current-transform))
|
||||
|
||||
ph (-> (gpt/point x (+ y height))
|
||||
(gpt/transform transform)
|
||||
(gpt/transform current-transform))]
|
||||
pw (cond-> (gpt/point (+ x width) y)
|
||||
(some? transform)
|
||||
(gpt/transform transform)
|
||||
|
||||
(some? current-transform)
|
||||
(gpt/transform current-transform))
|
||||
|
||||
ph (cond-> (gpt/point x (+ y height))
|
||||
(some? transform)
|
||||
(gpt/transform transform)
|
||||
|
||||
(some? current-transform)
|
||||
(gpt/transform current-transform))]
|
||||
[(gpt/distance pc pw) (gpt/distance pc ph)])
|
||||
[width height])]
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue