3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-10 10:16:37 +02:00
Code Issues Projects Releases Packages Wiki Activity

🔧 Small fix of debug functions

Browse source
This commit is contained in:
Andrés Moya 2022-04-29 11:05:04 +02:00
parent 0afbf02443
commit 151de33586
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
frontend/src/debug.cljs
View file

@ -91,7 +91,6 @@
(defn ^:export tap (defn ^:export tap
"Transducer function that can execute a side-effect `effect-fn` per input" "Transducer function that can execute a side-effect `effect-fn` per input"
[effect-fn] [effect-fn]
(fn [rf] (fn [rf]
(fn (fn
([] (rf)) ([] (rf))
@ -154,13 +153,14 @@
nil) nil)
(defn ^:export dump-buffer [] (defn ^:export dump-buffer []
(logjs "state" @st/last-events) (logjs "last-events" @st/last-events)
nil) nil)
(defn ^:export get-state [str-path] (defn ^:export get-state [str-path]
(let [path (->> (str/split str-path " ") (let [path (->> (str/split str-path " ")
(map d/read-string))] (map d/read-string)
(clj->js (get-in @st/state path))) vec)]
(js/console.log (clj->js (get-in @st/state path))))
nil) nil)
(defn dump-objects' (defn dump-objects'