diff options
author | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2011-12-23 21:29:15 +0100 |
---|---|---|
committer | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2011-12-23 21:29:15 +0100 |
commit | 102249de72f3e4b6f9fe0d8d2d71440dec68cf8e (patch) | |
tree | d038bc11cdf5b47f7fd07990db92979707910678 | |
parent | 7fb228efe3c58932bd465aedb8fa60f131523f87 (diff) |
Completely decouple the core from the Hunchentoot frontend by depending on local-time for HTTP date formatting.
-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) |