This commit is contained in:
parent
9a80548cf3
commit
0c7aab902a
|
@ -137,7 +137,9 @@
|
||||||
(sort-by :clock-value >)
|
(sort-by :clock-value >)
|
||||||
(map #(assoc % :datemark (time/day-relative (:timestamp %))))
|
(map #(assoc % :datemark (time/day-relative (:timestamp %))))
|
||||||
(group-by :datemark)
|
(group-by :datemark)
|
||||||
(map (fn [[k v]] [v {:type :datemark :value k}]))
|
(vals)
|
||||||
|
(sort-by (comp :clock-value first) >)
|
||||||
|
(map (fn [v] [v {:type :datemark :value (:datemark (first v))}]))
|
||||||
(flatten))
|
(flatten))
|
||||||
remove-last? (some (fn [{:keys [content-type]}]
|
remove-last? (some (fn [{:keys [content-type]}]
|
||||||
(= content-type content-type-status))
|
(= content-type content-type-status))
|
||||||
|
|
Loading…
Reference in New Issue