summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <code@mail.matthias.benkard.de>2011-12-23 21:29:15 +0100
committerMatthias Andreas Benkard <code@mail.matthias.benkard.de>2011-12-23 21:29:15 +0100
commit102249de72f3e4b6f9fe0d8d2d71440dec68cf8e (patch)
treed038bc11cdf5b47f7fd07990db92979707910678
parent7fb228efe3c58932bd465aedb8fa60f131523f87 (diff)
Completely decouple the core from the Hunchentoot frontend by depending on local-time for HTTP date formatting.
-rw-r--r--mulkcms.lisp6
1 files changed, 4 insertions, 2 deletions
diff --git a/mulkcms.lisp b/mulkcms.lisp
index 45fdac6..bf77bae 100644
--- a/mulkcms.lisp
+++ b/mulkcms.lisp
@@ -188,8 +188,10 @@
path
:row)))
(list :headers `((:last-modified .
- ,(hunchentoot:rfc-1123-date
- (simple-date:timestamp-to-universal-time last-update))))
+ ,(local-time:format-timestring
+ nil
+ (simple-date:timestamp-to-universal-time last-update)
+ :format local-time:+rfc-1123-format+)))
:content-type content-type
(if (and cached-data (simple-date:time< last-update (second cached-data)))
(first cached-data)