|
version 1.80, 2004/01/15 18:25:36
|
version 1.82, 2004/01/31 01:21:35
|
|
Line 396 sub user_crit_received {
|
Line 396 sub user_crit_received {
|
| my %contents=&unpackagemsg($message{$msgid},1); |
my %contents=&unpackagemsg($message{$msgid},1); |
| my $status='rec: '.($contents{'sendback'}? |
my $status='rec: '.($contents{'sendback'}? |
| &user_normal_msg($contents{'sendername'},$contents{'senderdomain'}, |
&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'}. |
&mt('User').' '.$ENV{'user.name'}.' '.&mt('at').' '.$ENV{'user.domain'}. |
| ' acknowledged receipt of message'."\n".' "'. |
' acknowledged receipt of message'."\n".' "'. |
| $contents{'subject'}.'"'."\n".&mt('dated').' '. |
$contents{'subject'}.'"'."\n".&mt('dated').' '. |
|
Line 1084 $content{'sendername'},$content{'senderd
|
Line 1084 $content{'sendername'},$content{'senderd
|
| '"><b>'.&mt('Next').'</b></a></td>'); |
'"><b>'.&mt('Next').'</b></a></td>'); |
| } |
} |
| $r->print('</tr></table><p><pre>'. |
$r->print('</tr></table><p><pre>'. |
| &Apache::lontexconvert::msgtexconverted($content{'message'}). |
&Apache::lontexconvert::msgtexconverted($content{'message'},1). |
| '</pre><hr>'.$content{'citation'}); |
'</pre><hr>'.$content{'citation'}); |
| } elsif ($ENV{'form.replyto'}) { |
} elsif ($ENV{'form.replyto'}) { |
| &comprep($r,$ENV{'form.replyto'}); |
&comprep($r,$ENV{'form.replyto'}); |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonmsg.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface