status-im/re-frame-10x
2
0
Fork 0
mirror of https://github.com/status-im/re-frame-10x.git synced 2025-02-20 09:48:29 +00:00
Code Issues Projects Releases Wiki Activity

Comment out features that aren't working to get ready for a release

Browse Source
This commit is contained in:
Daniel Compton 2018-01-23 13:47:50 +13:00
parent 326badfc68
commit 8424b6116d
3 changed files with 26 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/day8/re_frame/trace/view/container.cljs
View File

@ -130,7 +130,9 @@
:gap "7px"
:align :end
:height "50px"
:children [(tab-button :event "Event")
;; TODO: event tab
:children [(when (:debug? opts)
(tab-button :event "Event"))
(tab-button :app-db "app-db")
(tab-button :subs "Subs")
;(tab-button :views "Views")

21
src/day8/re_frame/trace/view/settings.cljs
View File

@ -96,7 +96,9 @@
:children [(let [num-epochs @(rf/subscribe [:epochs/number-of-matches])
num-traces @(rf/subscribe [:traces/number-of-traces])
epochs-to-retain (rf/subscribe [:settings/number-of-retained-epochs])]
[settings-box
;; TODO: retain last
#_[settings-box
[[rc/h-box
:align :center
:gap horizontal-gap
@ -120,8 +122,9 @@
[[:p num-epochs " epochs currently retained, involving " num-traces " traces."]]
settings-box-81])
[rc/line]
[settings-box
;; TODO: ignore epochs for:
#_[rc/line]
#_[settings-box
[[rc/h-box
:align :center
:gap horizontal-gap
@ -147,8 +150,9 @@
[:p "Useful if you want to ignore a periodic background polling event."]]
settings-box-131]
[rc/line]
[settings-box
;; TODO: filter out view trace
#_[rc/line]
#_[settings-box
[[rc/h-box
:align :center
:gap horizontal-gap
@ -174,8 +178,9 @@
[:p "Nominate one or more namespaces."]]
settings-box-131]
[rc/line]
(let [low-level-trace @(rf/subscribe [:settings/low-level-trace])]
;; TODO: remove low level trace
#_[rc/line]
#_(let [low-level-trace @(rf/subscribe [:settings/low-level-trace])]
[settings-box
[[rc/label :label "Remove low level trace"]
[rc/checkbox
@ -189,7 +194,7 @@
[[:p "Most of the time, low level trace is noisy and you want it filtered out."]]
settings-box-131])
[rc/line]
#_[rc/line]
[settings-box
[[rc/button
:class "bm-muted-button app-db-panel-button"

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

@ -73,7 +73,8 @@
[title-tag :created (long-tag-desc :created) @created-count]
[title-tag :re-run (long-tag-desc :re-run) @re-run-count]
[title-tag :destroyed (long-tag-desc :destroyed) @destroyed-count]
[title-tag :not-run (long-tag-desc :not-run) @not-run-count]]]
;; TODO: capture not-run traces
#_[title-tag :not-run (long-tag-desc :not-run) @not-run-count]]]
[rc/h-box
:align :center
:gap common/gs-19s
@ -84,7 +85,8 @@
:border-radius border-radius}
:children [[rc/checkbox
:model ignore-unchanged?
:label [:span "Ignore " [:b {:style {:font-weight "700"}} @ignore-unchanged-l2-count] " unchanged" [:br] "layer 2 subs"]
;; TODO: change from l2 subs to ignored l2 subs
:label [:span "Ignore " [:b {:style {:font-weight "700"}} @ignore-unchanged-l2-count] #_ " unchanged" [:br] "layer 2 subs"]
:style {:margin-top "6px"}
:on-change #(rf/dispatch [:subs/ignore-unchanged-subs? %])]]]]]))
@ -106,7 +108,8 @@
[rc/box
:width "64px" ;; (100-36)px from box above
:child [sub-tag type (short-tag-desc type)]]
(when run-times
;; TODO: report if a sub was run multiple times
#_(when run-times
[:span "Warning: run " run-times " times"])
[rc/h-box
:class "app-db-path--path-header"
@ -120,8 +123,10 @@
:disabled? true]]]
[rc/gap-f :size common/gs-12s]
[rc/label :label (str "Layer " layer)]
[rc/gap-f :size common/gs-12s]
[rc/box
;; TODO: capture previous sub run value and allow diffing it.
#_[rc/gap-f :size common/gs-12s]
#_[rc/box
:class "bm-muted-button app-db-path--button noselect"
:attr {:title "Show diff"
:on-click #(rf/dispatch [:subs/diff-pod? id (not diff?)])}