Browse Source

bugfix: published date was missing

master
Christian Mueller 12 years ago
parent
commit
a0ef174b86
  1. 2
      messages
  2. 18
      src/NoteHub/views/pages.clj

2
messages

@ -18,7 +18,7 @@ update = Save
published = Published published = Published
publisher = Publisher publisher = Publisher
edited = Edited edited = Edited
article-views = Article Views views = Article Views
statistics = Statistics statistics = Statistics
stats = statistics stats = statistics
export = export export = export

18
src/NoteHub/views/pages.clj

@ -141,20 +141,10 @@
(when-let [stats (:statistics (api/get-note (api/build-key [year month day] title)))] (when-let [stats (:statistics (api/get-note (api/build-key [year month day] title)))]
(layout (get-message :statistics) (layout (get-message :statistics)
[:table#stats.helvetica.central-element [:table#stats.helvetica.central-element
[:tr (map
[:td (get-message :published)] #(when (% stats)
[:td (:published stats)]] [:tr [:td (get-message %)] [:td (% stats)]])
(when (:edited stats) [:published :edited :publisher :views])])))
[:tr
[:td (get-message :edited)]
[:td (:edited stats)]])
(when (:publisher stats)
[:tr
[:td (get-message :publisher)]
[:td (:publisher stats)]])
[:tr
[:td (get-message :article-views)]
[:td (:views stats)]]])))
; Resolving of a short url ; Resolving of a short url
(defpage "/:short-url" {:keys [short-url]} (defpage "/:short-url" {:keys [short-url]}

Loading…
Cancel
Save