[bknr-cvs] hans changed trunk/projects/bos/web/tags.lisp

[BKNR Commits]

Revision: 3393
Author: hans
URL: http://bknr.net/trac/changeset/3393

Add set-cacheable tag

U   trunk/projects/bos/web/tags.lisp

Modified: trunk/projects/bos/web/tags.lisp
===================================================================
--- trunk/projects/bos/web/tags.lisp	2008-06-30 14:18:32 UTC (rev 3392)
+++ trunk/projects/bos/web/tags.lisp	2008-07-01 09:18:11 UTC (rev 3393)
@@ -193,3 +193,5 @@
 	((:script :type "text/javascript")
 	 (:princ #?"if (_gat) { var pageTracker = _gat._getTracker('$(*google-analytics-account*)'); pageTracker._initData(); pageTracker._trackPageview(); }"))))
 
+(define-bknr-tag set-cachable ()
+  (setf (hunchentoot:header-out :cache-control) "max-age=300"))
\ No newline at end of file