diff options
-rw-r--r-- | mulkcms.lisp | 6 |
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) |