|
version 1.298.2.1, 2009/03/20 20:36:41
|
version 1.306, 2009/03/16 18:20:22
|
|
Line 855 sub editxmlmode {
|
Line 855 sub editxmlmode {
|
| my $result; |
my $result; |
| my $problem=&Apache::lonnet::getfile($file); |
my $problem=&Apache::lonnet::getfile($file); |
| if ($problem eq -1) { |
if ($problem eq -1) { |
| &Apache::lonxml::error( |
&Apache::lonxml::error( |
| '<b> ' |
'<b> ' |
| .&mt('Unable to find [_1]', |
.&mt('Unable to find [_1]', |
| '<span class="LC_filename">'.$file.'</span>') |
'<span class="LC_filename">'.$file.'</span>') |
| .'</b>'); |
.'</b>'); |
| |
|
| $problem=''; |
$problem=''; |
| } |
} |
| if (defined($env{'form.editxmltext'}) || defined($env{'form.Undo'})) { |
if (defined($env{'form.editxmltext'}) || defined($env{'form.Undo'})) { |
|
Line 966 sub renderpage {
|
Line 967 sub renderpage {
|
| my $filename=(split('/',$file))[-1]; |
my $filename=(split('/',$file))[-1]; |
| my $error = |
my $error = |
| "<b> ".&mt('Unable to find [_1]', |
"<b> ".&mt('Unable to find [_1]', |
| '<span class="LC_filename">'.$filename.'</span>') |
'<span class="LC_filename">'.$filename.'</span>') |
| ."</b>"; |
."</b>"; |
| $result.= |
$result.= |
| &Apache::loncommon::simple_error_page($request,'Not available', |
&Apache::loncommon::simple_error_page($request,'Not available', |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonhomework.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework