version 1.145, 2010/01/25 18:09:42
|
version 1.147, 2010/01/26 13:08:08
|
Line 2259 END
|
Line 2259 END
|
if ($blocks->{$block} eq 'on') { |
if ($blocks->{$block} eq 'on') { |
$blockstatus = 'checked="checked"'; |
$blockstatus = 'checked="checked"'; |
} |
} |
$r->print('<label><input type="checkbox" name="'.$block.'_'.$parmcount.'" '.$blockstatus.' value="1" />'.$types->{$block}.'</label><br />'); |
$r->print('<span class="LC_nobreak"><label><input type="checkbox" name="'.$block.'_'.$parmcount.'" '.$blockstatus.' value="1" />'.$types->{$block}.'</label></span><br />'); |
} |
} |
$r->print(<<"END"); |
$r->print(<<"END"); |
</td> |
</td> |
<td><span class="LC_nobreak"><label> |
<td><span class="LC_nobreak"><label> |
<input type="checkbox" name="modify_$parmcount" />$lt{'modi'} |
<input type="checkbox" name="modify_$parmcount" />$lt{'modi'} |
</label><br /> |
</label></span><br /><span class="LC_nobreak"> |
<label> |
<label> |
<input type="checkbox" name="cancel_$parmcount" />$lt{'canc'} |
<input type="checkbox" name="cancel_$parmcount" />$lt{'canc'} |
</label></span> |
</label></span> |
Line 2315 END
|
Line 2315 END
|
<td> |
<td> |
END |
END |
foreach my $block (@{$typeorder}) { |
foreach my $block (@{$typeorder}) { |
$r->print('<label><input type="checkbox" name="'.$block.'_'.$parmcount.'" value="1" />'.$types->{$block}.'</label><br />'); |
$r->print('<span class="LC_nobreak"><label><input type="checkbox" name="'.$block.'_'.$parmcount.'" value="1" />'.$types->{$block}.'</label></span><br />'); |
} |
} |
$r->print(<<"END"); |
$r->print(<<"END"); |
</td> |
</td> |
<td><label> |
<td><span class="LC_nobreak"><label> |
<input type="checkbox" name="add_$parmcount" value="1" />$lt{'addb'} |
<input type="checkbox" name="add_$parmcount" value="1" />$lt{'addb'} |
</label></td> |
</label></span></td> |
END |
END |
$r->print(&Apache::loncommon::end_data_table_row()); |
$r->print(&Apache::loncommon::end_data_table_row()); |
$r->print(&Apache::loncommon::end_data_table()); |
$r->print(&Apache::loncommon::end_data_table()); |
Line 3409 sub handler {
|
Line 3409 sub handler {
|
&statuschange($env{'form.markdel'},'deleted',$folder); |
&statuschange($env{'form.markdel'},'deleted',$folder); |
if (!$result) { |
if (!$result) { |
my $message = &Apache::lonhtmlcommon::confirm_success(&mt('Failed to delete the message.'),1); |
my $message = &Apache::lonhtmlcommon::confirm_success(&mt('Failed to delete the message.'),1); |
$message .= '<p class="LC_error">'.$msg.'</p>'; |
$message .= '<p class="LC_error" style="font-size: inherit;">'.$msg.'</p>'; |
$message = &Apache::loncommon::confirmwrapper($message); |
$message = &Apache::loncommon::confirmwrapper($message); |
$r->print($message); |
$r->print($message); |
} |
} |
Line 3476 sub handler {
|
Line 3476 sub handler {
|
my $message = ''; |
my $message = ''; |
if ($failed) { |
if ($failed) { |
$message .= &Apache::lonhtmlcommon::confirm_success(&mt('Failed to move [quant,_1,message]',$failed),1); |
$message .= &Apache::lonhtmlcommon::confirm_success(&mt('Failed to move [quant,_1,message]',$failed),1); |
$message .= '<p class="LC_error">'. |
$message .= '<p class="LC_error" style="font-size: inherit;">'. |
join("</p>\n<p class=\"LC_error\">",@failed_msg). |
join("</p>\n<p class=\"LC_error\" style=\"font-size: inherit;\">",@failed_msg). |
"</p>\n"; |
"</p>\n"; |
} |
} |
$message .= &Apache::lonhtmlcommon::confirm_success(&mt('Moved [quant,_1,message]',$total)); |
$message .= &Apache::lonhtmlcommon::confirm_success(&mt('Moved [quant,_1,message]',$total)); |
Line 3504 sub handler {
|
Line 3504 sub handler {
|
my $message = ''; |
my $message = ''; |
if ($failed) { |
if ($failed) { |
$message .= &Apache::lonhtmlcommon::confirm_success(&mt('Failed to delete [quant,_1,message]',$failed),1); |
$message .= &Apache::lonhtmlcommon::confirm_success(&mt('Failed to delete [quant,_1,message]',$failed),1); |
$message .= '<p class="LC_error">'. |
$message .= '<p class="LC_error" style="font-size: inherit;">'. |
join("</p>\n<p class=\"LC_error\">",@failed_msg). |
join("</p>\n<p class=\"LC_error\" style=\"font-size: inherit;\">",@failed_msg). |
"</p>\n"; |
"</p>\n"; |
} |
} |
$message .= &Apache::lonhtmlcommon::confirm_success(&mt('Deleted [quant,_1,message]',$total)); |
$message .= &Apache::lonhtmlcommon::confirm_success(&mt('Deleted [quant,_1,message]',$total)); |