version 1.251, 2003/05/03 21:09:03
|
version 1.253, 2003/05/16 20:47:07
|
Line 1252 ENDNOTFOUND
|
Line 1252 ENDNOTFOUND
|
|
|
writeallows($request->uri); |
writeallows($request->uri); |
|
|
|
|
$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; |