diff options
| -rwxr-xr-x | journal.lisp | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/journal.lisp b/journal.lisp index b5c0508..ca57fac 100755 --- a/journal.lisp +++ b/journal.lisp @@ -62,8 +62,9 @@ 0))) (with-xml-output (*standard-output* :encoding "utf-8") (with-tag ("feed" '(("xmlns" "http://www.w3.org/2005/Atom"))) - (emit-simple-tags :title "Kommentare — Kompottkins Weisheiten" - :updated (atom-time + (with-tag ("title") + (xml-as-is "Kommentare — Kompottkins Weisheiten")) + (emit-simple-tags :updated (atom-time (max (or (single-object (select [max [slot-value 'journal-entry 'date]] :from [journal-entry] |