version 1.41, 2002/10/11 20:09:36
|
version 1.43, 2002/12/23 18:02:44
|
Line 210 sub user_crit_received {
|
Line 210 sub user_crit_received {
|
&user_normal_msg($contents{'sendername'},$contents{'senderdomain'}, |
&user_normal_msg($contents{'sendername'},$contents{'senderdomain'}, |
'Receipt: '.$ENV{'user.name'}.' at '.$ENV{'user.domain'}, |
'Receipt: '.$ENV{'user.name'}.' at '.$ENV{'user.domain'}, |
'User '.$ENV{'user.name'}.' at '.$ENV{'user.domain'}. |
'User '.$ENV{'user.name'}.' at '.$ENV{'user.domain'}. |
' acknowledged receipt of message "'. |
' acknowledged receipt of message'."\n".' "'. |
$contents{'subject'}.'" dated '.$contents{'time'}.".\n\n" |
$contents{'subject'}.'"'."\n".'dated '. |
.'Message ID: '.$contents{'msgid'}):'no msg req'); |
$contents{'time'}.".\n" |
|
):'no msg req'); |
$status.=' trans: '. |
$status.=' trans: '. |
&Apache::lonnet::put( |
&Apache::lonnet::put( |
'nohist_email',{$contents{'msgid'} => $message{$msgid}}); |
'nohist_email',{$contents{'msgid'} => $message{$msgid}}); |
Line 621 $content{'sendername'},$content{'senderd
|
Line 622 $content{'sendername'},$content{'senderd
|
'"><b>Forward</b></a></td>'. |
'"><b>Forward</b></a></td>'. |
'<td><a href="/adm/email?markunread='.&Apache::lonnet::escape($msgid). |
'<td><a href="/adm/email?markunread='.&Apache::lonnet::escape($msgid). |
'"><b>Mark Unread</b></a></td>'. |
'"><b>Mark Unread</b></a></td>'. |
|
'<td><a href="/adm/email?markdel='.&Apache::lonnet::escape($msgid). |
|
'"><b>Delete</b></a></td>'. |
'<td><a href="/adm/email"><b>Display all Messages</b></a></td>'. |
'<td><a href="/adm/email"><b>Display all Messages</b></a></td>'. |
'</tr></table><p><pre>'. |
'</tr></table><p><pre>'. |
&Apache::lontexconvert::msgtexconverted($content{'message'}). |
&Apache::lontexconvert::msgtexconverted($content{'message'}). |