3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-07 21:51:40 +02:00
Code Issues Projects Releases Packages Wiki 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
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}))) (change-stroke {:width value})))
(on-opacity-change [event] (on-opacity-change [event]
(let [value (dom/event->value event) (let [value (dom/event->value event)
value (parse-float value 1)] value (parse-float value 1)
value (/ value 10000)]
(change-stroke {:opacity value}))) (change-stroke {:opacity value})))
(on-color-change [event] (on-color-change [event]
(let [value (dom/event->value event)] (let [value (dom/event->value event)]
@ -139,9 +140,9 @@
[:input.slidebar [:input.slidebar
{:type "range" {:type "range"
:min "0" :min "0"
:max "1" :max "10000"
:value (:stroke-opacity shape "1") :value (* 10000 (:stroke-opacity shape 1))
:step "0.0001" :step "1"
:on-change on-opacity-change}]]]]))) :on-change on-opacity-change}]]]])))
(defmethod -render-menu :menu/fill (defmethod -render-menu :menu/fill
@ -154,7 +155,8 @@
(change-fill {:color value}))) (change-fill {:color value})))
(on-opacity-change [event] (on-opacity-change [event]
(let [value (dom/event->value event) (let [value (dom/event->value event)
value (parse-float value 1)] value (parse-float value 1)
value (/ value 10000)]
(change-fill {:opacity value}))) (change-fill {:opacity value})))
(on-color-picker-event [color] (on-color-picker-event [color]
(change-fill {:color color}))] (change-fill {:color color}))]
@ -186,9 +188,9 @@
[:input.slidebar [:input.slidebar
{:type "range" {:type "range"
:min "0" :min "0"
:max "1" :max "10000"
:value (:fill-opacity shape "1") :value (* 10000 (:fill-opacity shape 1))
:step "0.0001" :step "1"
:on-change on-opacity-change}]]]]))) :on-change on-opacity-change}]]]])))
(defmethod -render-menu :menu/rect-measures (defmethod -render-menu :menu/rect-measures