Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-03-15 17:21:17 -05:00
Code Issues Activity

Fix strange behavior of opacity range inputs.

Browse source
This commit is contained in:
Andrey Antukh 2016-04-26 20:09:26 +03:00
parent 468f6a27e1
commit 0969d62a50
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95
1 changed files with 10 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
src/uxbox/ui/workspace/sidebar/options.cljs
View file

@ -86,7 +86,8 @@
(change-stroke {:width value})))
(on-opacity-change [event]
(let [value (dom/event->value event)
value (parse-float value 1)]
value (parse-float value 1)
value (/ value 10000)]
(change-stroke {:opacity value})))
(on-color-change [event]
(let [value (dom/event->value event)]
@ -139,9 +140,9 @@
[:input.slidebar
{:type "range"
:min "0"
:max "1"
:value (:stroke-opacity shape "1")
:step "0.0001"
:max "10000"
:value (* 10000 (:stroke-opacity shape 1))
:step "1"
:on-change on-opacity-change}]]]])))
(defmethod -render-menu :menu/fill
@ -154,7 +155,8 @@
(change-fill {:color value})))
(on-opacity-change [event]
(let [value (dom/event->value event)
value (parse-float value 1)]
value (parse-float value 1)
value (/ value 10000)]
(change-fill {:opacity value})))
(on-color-picker-event [color]
(change-fill {:color color}))]
@ -186,9 +188,9 @@
[:input.slidebar
{:type "range"
:min "0"
:max "1"
:value (:fill-opacity shape "1")
:step "0.0001"
:max "10000"
:value (* 10000 (:fill-opacity shape 1))
:step "1"
:on-change on-opacity-change}]]]])))
(defmethod -render-menu :menu/rect-measures