--- loncom/interface/lonfeedback.pm	2006/12/27 02:45:41	1.238
+++ loncom/interface/lonfeedback.pm	2007/01/05 06:47:22	1.240
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.238 2006/12/27 02:45:41 raeburn Exp $
+# $Id: lonfeedback.pm,v 1.240 2007/01/05 06:47:22 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1468,7 +1468,7 @@ sub replicate_attachments {
 }
 
 sub mail_screen {
-  my ($r,$feedurl,$options,$symb) = @_;
+  my ($r,$feedurl,$options,$caller_symb) = @_;
   if (exists($env{'form.origpage'})) {
       &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['subject','comment','currnewattach','addnewattach','deloldattach','delnewattach','timestamp','idx','anondiscuss','discuss','blog','group','ref']);
   }
@@ -1480,7 +1480,7 @@ sub mail_screen {
             'reta' => 'Retained attachments',
             'atta' => 'Attachment (128 KB max size)',
            );
-  my $restitle = &get_resource_title($symb,$feedurl);
+  my $restitle = &get_resource_title($caller_symb,$feedurl);
   my $quote='';
   my $subject = '';
   my $comment = '';
@@ -3845,7 +3845,7 @@ ENDREDIR
       my ($status,$numsent)=&send_msg(&clear_out_html($env{'form.subject'},
 						      undef,1),
 				      $feedurl,$email,$citations,
-				      $attachmenturl,$symb,%to);
+				      $attachmenturl,$usersymb,%to);
 
 # Discussion? Store that.
       my $numpost=0;