Changeset 3415 for trunk/projects/bos

Timestamp:

07/02/08 18:07:54 (2 months ago)

Author:

ksprotte

Message:

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

Files:

• trunk/projects/bos/web/tags.lisp (modified) (1 diff)

trunk/projects/bos/web/tags.lisp

@@ -37 +37 @@
-
-(define-bknr-tag generate-cert ()
-ensure-
+
-  (with-template-vars (gift email name address want-print)
-    (let ((contract (find-store-object (parse-integer (get-template-var :contract-id)))))