statistics template fixed
This commit is contained in:
@@ -83,16 +83,17 @@
|
||||
(let [page-title (get-message :statistics)
|
||||
info (assoc stats :publisher publisher)]
|
||||
(layout :no-js {} page-title
|
||||
[:h2.central-element note-title]
|
||||
[:h3.central-element.helvetica page-title]
|
||||
[:table#stats.helvetica.central-element
|
||||
[:div.central-element.helvetica {:style "width: 80%"}
|
||||
[:h2 note-title]
|
||||
[:h3.helvetica page-title]
|
||||
[:table#stats
|
||||
(map
|
||||
#(when-let [v (% info)]
|
||||
[:tr
|
||||
[:td (str (get-message %) ":")]
|
||||
[:td (if (or (= % :published) (= % :edited))
|
||||
(str (java.util.Date. (Long/parseLong v))) v)]])
|
||||
[:published :edited :publisher :views])])))
|
||||
[:published :edited :publisher :views])]])))
|
||||
|
||||
(defn note-update-page [note-id note]
|
||||
(input-form "/update-note"
|
||||
|
||||
Reference in New Issue
Block a user