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

🔥 Remove unused code.

Browse source
This commit is contained in:
Andrey Antukh 2020-12-21 11:35:13 +01:00 • committed by Alonso Torres
parent 4a5e27e641
commit 38a645ad49
1 changed files with 2 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
frontend/src/app/main/store.cljs
View file

@ -25,26 +25,14 @@
(defonce state (ptk/store {:resolve ptk/resolve}))
(defonce stream (ptk/input-stream state))
(defn- repr-event
[event]
(cond
(satisfies? ptk/Event event)
(str "typ: " (pr-str (ptk/type event)))
(and (fn? event)
(pos? (count (.-name event))))
(str "fn: " (demunge (.-name event)))
:else
(str "unk: " (pr-str event))))
(when *assert*
(defonce debug-subscription
(->> stream
(rx/filter ptk/event?)
(rx/filter (fn [s] (and (debug? :events)
(not (debug-exclude-events (ptk/type s))))))
(rx/subs #(println "[stream]: " (repr-event %))))))
(rx/subs #(println "[stream]: " (ptk/repr-event %))))))
(defn emit!
([] nil)
([event]