bugfix: published date was missing
This commit is contained in:
@@ -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
|
||||||
|
|||||||
@@ -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]}
|
||||||
|
|||||||
Reference in New Issue
Block a user