version 1.114, 2003/03/10 20:03:55
|
version 1.116, 2003/03/25 22:51:48
|
Line 422 sub editxmlmode {
|
Line 422 sub editxmlmode {
|
my ($request,$file) = @_; |
my ($request,$file) = @_; |
my $result; |
my $result; |
my $problem=&Apache::lonnet::getfile($file); |
my $problem=&Apache::lonnet::getfile($file); |
if ($problem == -1) { |
if ($problem eq -1) { |
&Apache::lonxml::error("<b> Unable to find <i>$file</i></b>"); |
&Apache::lonxml::error("<b> Unable to find <i>$file</i></b>"); |
$problem=''; |
$problem=''; |
} |
} |
Line 531 sub get_template_list {
|
Line 531 sub get_template_list {
|
} |
} |
} |
} |
if (@allnames && !$result) { |
if (@allnames && !$result) { |
$result="<option>Select a $extension type</option>\n<option>". |
$result="<option>Select a $extension template</option>\n<option>". |
join('</option><option>',sort(@allnames)).'</option>'; |
join('</option><option>',sort(@allnames)).'</option>'; |
} |
} |
return $result; |
return $result; |