github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-09-10 22:19:19 +00:00
Code Issues Packages Projects Releases Wiki Activity

🐛 Fix problem with shift and alt in numeric inputs

Browse Source
This commit is contained in:
Alonso Torres 2026-05-21 11:02:47 +02:00 committed by GitHub
parent df0a58af93
commit c0e7bfae00
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
frontend/src/app/main/ui/ds/controls/numeric_input.cljs
View File

@ -470,7 +470,11 @@
(let [parsed (parse-value (str/trim (mf/ref-val raw-value*)) (mf/ref-val last-value*) min max nillable) (let [parsed (parse-value (str/trim (mf/ref-val raw-value*)) (mf/ref-val last-value*) min max nillable)
current-value (or parsed default) current-value (or parsed default)
new-val (increment current-value step min max)] eff-step (cond
(kbd/shift? event) (* step 10)
(kbd/alt? event) (* step 0.1)
:else step)
new-val (increment current-value eff-step min max)]
(dom/prevent-default event) (dom/prevent-default event)
(update-input (fmt/format-number new-val)) (update-input (fmt/format-number new-val))
(apply-value (dm/str new-val)))) (apply-value (dm/str new-val))))
@ -483,7 +487,11 @@
(let [parsed (parse-value (str/trim (mf/ref-val raw-value*)) (mf/ref-val last-value*) min max nillable) (let [parsed (parse-value (str/trim (mf/ref-val raw-value*)) (mf/ref-val last-value*) min max nillable)
current-value (or parsed default) current-value (or parsed default)
new-val (decrement current-value step min max)] eff-step (cond
(kbd/shift? event) (* step 10)
(kbd/alt? event) (* step 0.1)
:else step)
new-val (decrement current-value eff-step min max)]
(dom/prevent-default event) (dom/prevent-default event)
(update-input (fmt/format-number new-val)) (update-input (fmt/format-number new-val))
(apply-value (dm/str new-val)))))))) (apply-value (dm/str new-val))))))))