status-im
/
re-frame-10x
mirror of https://github.com/status-im/re-frame-10x.git
2
0
Fork 0
Code Issues Projects Releases Wiki Activity

Remove debugging code

This commit is contained in:
Daniel Compton 2018-02-09 14:17:58 +13:00
parent 930ecc68f4
commit 4081c80810
4 changed files with 24 additions and 33 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
project.clj
View File

@ -9,7 +9,7 @@
[binaryage/devtools "0.9.4"] [binaryage/devtools "0.9.4"]
[cljsjs/react-flip-move "2.9.17-0"] [cljsjs/react-flip-move "2.9.17-0"]
[com.yahoo.platform.yui/yuicompressor "2.4.8" :exclusions [rhino/js]] [com.yahoo.platform.yui/yuicompressor "2.4.8" :exclusions [rhino/js]]
[expound "0.4.0"] ;[expound "0.4.0"]
] ]
:plugins [[thomasa/mranderson "0.4.7"] :plugins [[thomasa/mranderson "0.4.7"]
[lein-less "RELEASE"]] [lein-less "RELEASE"]]

3
src/day8/re_frame/trace/events.cljs
View File

@ -377,7 +377,8 @@
:app-db/create-path :app-db/create-path
app-db-path-mw app-db-path-mw
(fn [paths _] (fn [paths _]
(assoc paths (js/Date.now) {:diff? false :open? true :path nil :path-str "[]" :valid-path? true})))
(assoc paths (js/Date.now) {:diff? false :open? true :path nil :path-str "" :valid-path? true})))

14
src/day8/re_frame/trace/subs.cljs
View File

@ -3,8 +3,7 @@
[day8.re-frame.trace.metamorphic :as metam] [day8.re-frame.trace.metamorphic :as metam]
[day8.re-frame.trace.utils.utils :as utils] [day8.re-frame.trace.utils.utils :as utils]
[clojure.string :as str] [clojure.string :as str]
[cljs.spec.alpha :as s] [cljs.spec.alpha :as s]))
[expound.alpha :as expound]))
(rf/reg-sub (rf/reg-sub
:settings/root :settings/root
@ -408,9 +407,6 @@
:opt-un [:sub/value :sub/previous-value])) :opt-un [:sub/value :sub/previous-value]))
(s/def :subs/view-subs (s/coll-of :subs/view-panel-sub)) (s/def :subs/view-subs (s/coll-of :subs/view-panel-sub))
(defn sub-type-value (defn sub-type-value
[sub-type] [sub-type]
(case sub-type (case sub-type
@ -478,13 +474,7 @@
(assoc sub :previous-value (:previous-value state)) (assoc sub :previous-value (:previous-value state))
sub)] sub)]
sub))) sub)))
(sort-by :order sub-sort-val)) (sort-by :order sub-sort-val))]
]
#_(utils/spy "subx" subx)
#_(when-not (s/valid? :subs/view-subs subx)
(js/console.error (expound/expound-str :subs/view-subs subx)))
subx)) subx))
(rf/reg-sub (rf/reg-sub

2
src/day8/re_frame/trace/view/subs.cljs
View File

@ -289,7 +289,7 @@
:style {:margin "19px 0px"}] :style {:margin "19px 0px"}]
^{:key "inter-epoch-title"} ^{:key "inter-epoch-title"}
[:h2 {:class "bm-heading-text" [:h2 {:class "bm-heading-text"
:style {:margin "19px 0px"}} "Inter-epoch subscriptions"] :style {:margin "19px 0px"}} "Inter-Epoch Subscriptions"]
(for [p inter-epoch-subs] (for [p inter-epoch-subs]
^{:key (:id p)} ^{:key (:id p)}
[pod (merge p (get sub-expansions (:id p)))]))) [pod (merge p (get sub-expansions (:id p)))])))