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

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")