0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-03-14 08:41:48 -05:00

🐛 Review fixes

This commit is contained in:
alonso.torres 2020-09-07 12:21:10 +02:00 committed by Andrey Antukh
parent 73dbad9c58
commit 568f7f5b3d
4 changed files with 2 additions and 6103 deletions

File diff suppressed because it is too large Load diff

View file

@ -101,8 +101,7 @@
(def workspace-recent-colors (def workspace-recent-colors
(l/derived (fn [state] (l/derived (fn [state]
(when-let [file (:workspace-file state)] (get-in state [:workspace-data :recent-colors] []))
(get-in file [:data :recent-colors])))
st/state)) st/state))
(def workspace-project (def workspace-project

View file

@ -22,20 +22,6 @@
[okulary.core :as l] [okulary.core :as l]
[app.main.refs :as refs])) [app.main.refs :as refs]))
(def recent-colors
(letfn [(selector [{:keys [objects]}]
(as-> {} $
(reduce (fn [acc shape]
(-> acc
(update (:fill-color shape) (fnil inc 0))
(update (:stroke-color shape) (fnil inc 0))))
$ (vals objects))
(reverse (sort-by second $))
(map first $)
(remove nil? $)))]
(l/derived selector st/state)))
;; --- Color Picker Modal ;; --- Color Picker Modal
(mf/defc value-selector [{:keys [hue saturation value on-change]}] (mf/defc value-selector [{:keys [hue saturation value on-change]}]

View file

@ -205,7 +205,7 @@
(js/URL.createObjectURL b)) (js/URL.createObjectURL b))
(defn set-css-property [node property value] (defn set-css-property [node property value]
(.setProperty (.-style node) property value)) (.setProperty (.-style ^js node) property value))
(defn capture-pointer [event] (defn capture-pointer [event]
(-> event get-target (.setPointerCapture (.-pointerId event)))) (-> event get-target (.setPointerCapture (.-pointerId event))))