summaryrefslogtreecommitdiff
path: root/mulkcms.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'mulkcms.lisp')
-rw-r--r--mulkcms.lisp1
1 files changed, 1 insertions, 0 deletions
diff --git a/mulkcms.lisp b/mulkcms.lisp
index 2bea7c5..f2c0292 100644
--- a/mulkcms.lisp
+++ b/mulkcms.lisp
@@ -194,6 +194,7 @@
(simple-date:timestamp-to-universal-time last-update))
:format local-time:+rfc-1123-format+)))
:content-type content-type
+ :body
(if (and cached-data (simple-date:time< last-update (second cached-data)))
(first cached-data)
(let ((generated-content (funcall thunk)))