summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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)