version 1.78, 2004/01/15 03:53:12
|
version 1.83, 2004/01/31 01:26:41
|
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'}); |
Line 1213 $content{'sendername'},$content{'senderd
|
Line 1213 $content{'sendername'},$content{'senderd
|
} |
} |
} |
} |
if ($sendstatus=~/^(\s*(?:ok|con_delayed)\s*)*$/) { |
if ($sendstatus=~/^(\s*(?:ok|con_delayed)\s*)*$/) { |
|
$r->print('<br /><font color="green">'.&mt('Completed.').'</font>'); |
if ($ENV{'form.displayedcrit'}) { |
if ($ENV{'form.displayedcrit'}) { |
&discrit($r); |
&discrit($r); |
} else { |
} else { |