summaryrefslogtreecommitdiff
path: root/macros.lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2007-10-05 15:24:00 +0200
committerMatthias Benkard <code@mail.matthias.benkard.de>2007-10-05 15:24:00 +0200
commite6b65cb7b6c16d1fb9ecb86260dddb1fc0c4b115 (patch)
tree71a11ce4bef2b308a34fb4fca0a169c7f651eedd /macros.lisp
parent6f902003195726be98e6961111bcf0e9251a9023 (diff)
Support posting and editing journal entries.
darcs-hash:e7a6041bdeeddcd098313a6c21491cefbaedbb21
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