version 1.252, 2003/05/16 18:34:56
|
version 1.253, 2003/05/16 20:47:07
|
Line 1252 ENDNOTFOUND
|
Line 1252 ENDNOTFOUND
|
|
|
writeallows($request->uri); |
writeallows($request->uri); |
|
|
# If we're editing, show the filename of the resource in the frame's main |
|
# title |
|
if ($ENV{'form.editmode'}) { |
|
my $filename = $request->uri; |
|
# Everything after the last / |
|
$filename = substr($filename, rindex($filename, '/') + 1); |
|
$result = substr($result, 0, rindex($result, '</html>')); |
|
$result .= "<script>top.document.title = '$filename - LON-CAPA Construction Space';</script>"; |
|
$result .= "\n</html>\n"; |
|
} |
|
|
|
|
|
$request->print($result); |
$request->print($result); |
|
|
return OK; |
return OK; |
} |
} |
|
|
|
sub display_title { |
|
my $result; |
|
if ($ENV{'request.state'} eq 'construct') { |
|
my $title=&Apache::lonnet::gettitle(); |
|
if (!defined($title) || $title eq '') { |
|
$title = $ENV{'request.filename'}; |
|
$title = substr($title, rindex($title, '/') + 1); |
|
} |
|
$result = "<script type='text/javascript'>top.document.title = '$title - LON-CAPA Construction Space';</script>"; |
|
} |
|
return $result; |
|
} |
|
|
sub debug { |
sub debug { |
if ($Apache::lonxml::debug eq 1) { |
if ($Apache::lonxml::debug eq 1) { |
$|=1; |
$|=1; |