|
|
|
|
@ -83,16 +83,17 @@
@@ -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" |
|
|
|
|
|