--- loncom/interface/lonmsg.pm 2004/01/28 20:48:35 1.81
+++ loncom/interface/lonmsg.pm 2004/01/31 01:26:41 1.83
@@ -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.83 2004/01/31 01:26:41 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -396,7 +396,7 @@ sub user_crit_received {
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').' '.
@@ -1213,6 +1213,7 @@ $content{'sendername'},$content{'senderd
}
}
if ($sendstatus=~/^(\s*(?:ok|con_delayed)\s*)*$/) {
+ $r->print('
'.&mt('Completed.').'');
if ($ENV{'form.displayedcrit'}) {
&discrit($r);
} else {