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

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