[LON-CAPA-cvs] cvs: loncom /interface lonmsg.pm

www lon-capa-cvs@mail.lon-capa.org
Sat, 31 Jan 2004 01:21:35 -0000


www		Fri Jan 30 20:21:35 2004 EDT

  Modified files:              
    /loncom/interface	lonmsg.pm 
  Log:
  Bug #2640: Add subject to receipt subject.
  
  
Index: loncom/interface/lonmsg.pm
diff -u loncom/interface/lonmsg.pm:1.81 loncom/interface/lonmsg.pm:1.82
--- loncom/interface/lonmsg.pm:1.81	Wed Jan 28 15:48:35 2004
+++ loncom/interface/lonmsg.pm	Fri Jan 30 20:21:35 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines for messaging
 #
-# $Id: lonmsg.pm,v 1.81 2004/01/28 20:48:35 albertel Exp $
+# $Id: lonmsg.pm,v 1.82 2004/01/31 01:21:35 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -396,7 +396,7 @@
     my %contents=&unpackagemsg($message{$msgid},1);
     my $status='rec: '.($contents{'sendback'}?
      &user_normal_msg($contents{'sendername'},$contents{'senderdomain'},
-                     &mt('Receipt').': '.$ENV{'user.name'}.' at '.$ENV{'user.domain'},
+                     &mt('Receipt').': '.$ENV{'user.name'}.' '.&mt('at').' '.$ENV{'user.domain'}.', '.$contents{'subject'},
                      &mt('User').' '.$ENV{'user.name'}.' '.&mt('at').' '.$ENV{'user.domain'}.
                      ' acknowledged receipt of message'."\n".'   "'.
                      $contents{'subject'}.'"'."\n".&mt('dated').' '.