Index: openacs-4/packages/postcard/www/confirm.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/postcard/www/confirm.tcl,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/postcard/www/confirm.tcl	20 Apr 2001 20:51:22 -0000	1.1
+++ openacs-4/packages/postcard/www/confirm.tcl	21 Aug 2001 22:22:29 -0000	1.2
@@ -7,6 +7,7 @@
   @creation-date 2000-10-23
   @cvs-id $Id$
 } {
+  card_id:integer,notnull
   image_id:integer,notnull
   sender:notnull
   recipient:notnull
@@ -22,5 +23,9 @@
 }
 
 # Insert a new postcard in the database, set card_id to the card id value
+ad_require_permission [ad_conn package_id] "postcard_create_card"
 
+set exported_vars [export_form_vars [list sender card_id recipient subject message card_id]]
+
 ad_return_template
+