Equalise table padding

This commit is contained in:
chris (daiyi) 2017-08-31 16:55:18 +02:00
parent 24b8335bd8
commit 0339579c1c
3 changed files with 6 additions and 6 deletions

View File

@ -158,6 +158,7 @@
#--re-frame-trace-- th,
#--re-frame-trace-- td {
display: table-cell;
padding: 0 5px;
}
#--re-frame-trace-- tr {
display: table-row;
@ -263,7 +264,7 @@
flex: 1;
}
#--re-frame-trace-- .panel-content-scrollable {
margin: 10px 0 0 10px;
margin: 0 10px;
flex: 1 0 auto;
height: 100%;
overflow: auto;

View File

@ -189,6 +189,7 @@
}
th, td {
display: table-cell;
padding: 0 5px;
}
tr {
display: table-row;
@ -310,7 +311,7 @@
flex: 1;
}
.panel-content-scrollable {
margin: 10px 0 0 10px;
margin: 0 10px;
flex: 1 0 auto;
height: 100%;
overflow: auto;

View File

@ -164,8 +164,7 @@
(defn render-traces [showing-traces filter-items filter-input trace-detail-expansions]
(doall
(for [{:keys [op-type id operation tags duration] :as trace} showing-traces]
(let [padding {:padding "0px 5px 0px 5px"}
row-style (merge padding {:border-top (case op-type :event "1px solid lightgrey" nil)})
(let [row-style {:border-top (case op-type :event "1px solid lightgrey" nil)}
show-row? (get-in @trace-detail-expansions [:overrides id]
(:show-all? @trace-detail-expansions))
op-name (if (vector? operation)
@ -207,14 +206,13 @@
(.toFixed duration 1) " ms"]]
(when show-row?
[:tr {:key (str id "-details")}
[:td.trace-details {:col-span 3
[:td.trace-details {:col-span 4
:on-click #(.log js/console tags)}
(let [tag-str (with-out-str (pprint/pprint tags))
string-size-limit 400]
(if (< string-size-limit (count tag-str))
(str (subs tag-str 0 string-size-limit) " ...")
tag-str))]]))))))
(defn render-trace-panel []
(let [filter-input (r/atom "")
filter-items (r/atom (localstorage/get "filter-items" []))