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

[BKNR Commits]

Revision: 3415
Author: ksprotte
URL: http://bknr.net/trac/changeset/3415

generate-cert use bknr-session instead of ensure-bknr-session

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

Modified: trunk/projects/bos/web/tags.lisp
===================================================================
--- trunk/projects/bos/web/tags.lisp	2008-07-02 15:59:24 UTC (rev 3414)
+++ trunk/projects/bos/web/tags.lisp	2008-07-02 16:07:54 UTC (rev 3415)
@@ -36,7 +36,7 @@
   (emit-tag-children))
 
 (define-bknr-tag generate-cert ()
-  (ensure-bknr-session)
+  (bknr-session)
   (with-template-vars (gift email name address want-print)
     (let ((contract (find-store-object (parse-integer (get-template-var :contract-id)))))
       (when (equal want-print "no")