version 1.9, 2006/04/23 05:34:45
|
version 1.10, 2006/04/23 05:49:57
|
Line 1934 sub handler {
|
Line 1934 sub handler {
|
my ($result,$msg) = |
my ($result,$msg) = |
&statuschange($env{'form.markdel'},'deleted',$folder); |
&statuschange($env{'form.markdel'},'deleted',$folder); |
if (!$result) { |
if (!$result) { |
$r->print('<p class="LC_error">Failed to delete the message.</p>'. |
$r->print('<p class="LC_error">'. |
|
&mt('Failed to delete the message.').'</p>'. |
'<p class="LC_error">'.$msg."</p>\n"); |
'<p class="LC_error">'.$msg."</p>\n"); |
} |
} |
&Apache::loncommunicate::menu($r); |
&Apache::loncommunicate::menu($r); |
Line 1957 sub handler {
|
Line 1958 sub handler {
|
&printheader($r,'','Moved Messages'); |
&printheader($r,'','Moved Messages'); |
if ($failed) { |
if ($failed) { |
$r->print('<p class="LC_error"> |
$r->print('<p class="LC_error"> |
Failed to move '.$failed.' message(s)</p>'); |
'.&mt('Failed to move [_1] message(s)',$failed). |
|
'</p>'); |
$r->print('<p class="LC_error">'. |
$r->print('<p class="LC_error">'. |
join("</p>\n<p class=\"LC_error\">",@failed_msg). |
join("</p>\n<p class=\"LC_error\">",@failed_msg). |
"</p>\n"); |
"</p>\n"); |
} |
} |
$r->print('Moved '.$total.' message(s)<p>'); |
$r->print(&mt('Moved [_1] message(s)',$total).'<p>'); |
&Apache::loncommunicate::menu($r); |
&Apache::loncommunicate::menu($r); |
&disall($r,($folder?$folder:$dismode)); |
&disall($r,($folder?$folder:$dismode)); |
} elsif ($env{'form.markeddel'}) { |
} elsif ($env{'form.markeddel'}) { |
Line 1983 sub handler {
|
Line 1985 sub handler {
|
&printheader($r,'','Deleted Messages'); |
&printheader($r,'','Deleted Messages'); |
if ($failed) { |
if ($failed) { |
$r->print('<p class="LC_error"> |
$r->print('<p class="LC_error"> |
Failed to delete '.$failed.' message(s)</p>'); |
'.&mt('Failed to delete [_1] message(s)',$failed). |
|
'</p>'); |
$r->print('<p class="LC_error">'. |
$r->print('<p class="LC_error">'. |
join("</p>\n<p class=\"LC_error\">",@failed_msg). |
join("</p>\n<p class=\"LC_error\">",@failed_msg). |
"</p>\n"); |
"</p>\n"); |
} |
} |
$r->print('Deleted '.$total.' message(s)<p>'); |
$r->print(&mt('Deleted [_1] message(s)',$total).'<p>'); |
&Apache::loncommunicate::menu($r); |
&Apache::loncommunicate::menu($r); |
&disall($r,($folder?$folder:$dismode)); |
&disall($r,($folder?$folder:$dismode)); |
} elsif ($env{'form.markunread'}) { |
} elsif ($env{'form.markunread'}) { |