summaryrefslogtreecommitdiff
path: root/macros.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'macros.lisp')
-rw-r--r--macros.lisp4
1 files changed, 4 insertions, 0 deletions
diff --git a/macros.lisp b/macros.lisp
index 179adca..a17891f 100644
--- a/macros.lisp
+++ b/macros.lisp
@@ -34,6 +34,10 @@
(emit-close-tag "html"))
+(defmacro with-web-journal ((page-title) &body body)
+ `(call-with-web-journal ,page-title #'(lambda () ,@body)))
+
+
(defmacro with-result-cache ((cache-id &key (younger-than nil younger-than-p))
&body body)
`(call-with-result-cache ,cache-id