summaryrefslogtreecommitdiff
path: root/journal.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'journal.lisp')
-rwxr-xr-xjournal.lisp6
1 files changed, 4 insertions, 2 deletions
diff --git a/journal.lisp b/journal.lisp
index 9de97ae..f99aae4 100755
--- a/journal.lisp
+++ b/journal.lisp
@@ -341,7 +341,8 @@ after another in any arbitrary order."
(emit-simple-tags :title "Kompottkins Weisheiten"
:updated (atom-time
(max (reduce #'max *journal-entries*
- :key #'date-of)
+ :key #'date-of
+ :initial-value 0)
(reduce #'(lambda (x y)
(cond ((and x y)
(max x y))
@@ -349,7 +350,8 @@ after another in any arbitrary order."
(y y)
(t 0)))
*journal-entries*
- :key #'last-modification-of)))
+ :key #'last-modification-of
+ :initial-value 0)))
:id "88ad4730-90bc-4cc1-9e1f-d4cdb9ce177c")
(with-tag ("subtitle")
(xml-as-is "Geschwafel eines libertärsozialistischen Geeks"))