Index: openacs-4/packages/postcard/www/send-card.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/postcard/www/send-card.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/postcard/www/send-card.tcl	21 Aug 2001 22:22:29 -0000	1.2
+++ openacs-4/packages/postcard/www/send-card.tcl	28 Aug 2002 07:51:18 -0000	1.3
@@ -9,7 +9,6 @@
 } {
   card_id:integer,notnull
   image_id:integer,notnull
-  sender:notnull
   recipient:notnull
   subject:notnull
   message:notnull
@@ -23,6 +22,10 @@
 
 set pickup_code [ns_crypt $card_id foobar]
 
+# Don't take the email from the poster. Pull it out of the db instead.
+ad_get_user_info
+set sender $email
+
 db_transaction {
 
     db_dml add_message {
@@ -51,7 +54,7 @@
 }
 
 set message  "
-You have received a postcard from $sender.
+You have received a postcard from $first_names $last_name ($sender).
 
 You may go to $url to pick up your card!