Index: openacs-4/packages/postcard/www/confirm.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/postcard/www/confirm.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/postcard/www/confirm.tcl	21 Aug 2001 22:52:06 -0000	1.3
+++ openacs-4/packages/postcard/www/confirm.tcl	28 Aug 2002 07:51:18 -0000	1.4
@@ -9,7 +9,6 @@
 } {
   card_id:integer,notnull
   image_id:integer,notnull
-  sender:notnull
   recipient:notnull
   subject:notnull
   message:notnull
@@ -24,6 +23,8 @@
 
 # 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"
+ad_get_user_info
+set sender $email
 
 ad_return_template