summaryrefslogtreecommitdiff
path: root/src/mulk/benki/wiki.clj
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <code@mail.matthias.benkard.de>2012-02-27 21:59:54 +0100
committerMatthias Andreas Benkard <code@mail.matthias.benkard.de>2012-02-27 21:59:54 +0100
commit083b58e0a40858e2277f4bd101ffd54097f01da0 (patch)
tree2e72e346ee6bd26b59d1234ef9bf5141f6680721 /src/mulk/benki/wiki.clj
parent7c0b0313d1ac80e2e10c4b20e7f6a291b1ad7a56 (diff)
Wiki: Format dates more readably.
Diffstat (limited to 'src/mulk/benki/wiki.clj')
-rw-r--r--src/mulk/benki/wiki.clj5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/mulk/benki/wiki.clj b/src/mulk/benki/wiki.clj
index 8501d83..f5e7f30 100644
--- a/src/mulk/benki/wiki.clj
+++ b/src/mulk/benki/wiki.clj
@@ -2,7 +2,8 @@
(:refer-clojure :exclude [distinct conj! case compile drop take sort disj!
resultset-seq])
(:use [clojure repl pprint]
- [hiccup core page-helpers]
+ [hiccup core page-helpers]
+ [hiccup.core :only [escape-html]]
[mulk.benki util db]
[clojure.core.match
:only [match]]
@@ -140,7 +141,7 @@
[:td [:a {:href (link :wiki
(:title rev)
(fmt nil "?revision=~a" (:id rev)))}
- (:date rev)]]
+ (escape-html (format-date (:date rev)))]]
[:td (:title rev)]
[:td (:first_name rev)]])]])))))