version 1.67, 2003/05/23 13:56:39
|
version 1.68, 2003/05/23 21:47:27
|
Line 180 sub registerurl {
|
Line 180 sub registerurl {
|
((($ENV{'request.publicaccess'}) || |
((($ENV{'request.publicaccess'}) || |
(!&Apache::lonnet::is_on_map($ENV{'REQUEST_URI'}))) && |
(!&Apache::lonnet::is_on_map($ENV{'REQUEST_URI'}))) && |
(!$forcereg))) { |
(!$forcereg))) { |
return $result. |
my $loadfunction=''; |
'<script type="text/javascript">function LONCAPAreg(){;} function LONCAPAstale(){}</script>'.$force_title; |
my $unloadfunction=''; |
|
unless (1 || ($ENV{'browser.interface'} eq 'textual') || |
|
($ENV{'environment.remote'} eq 'off') || |
|
($ENV{'request.publicaccess'})) { |
|
my $reopen=&Apache::lonmenu::reopenmenu(); |
|
$loadfunction='swmenu='.$reopen.'swmenu.noclient=0;'; |
|
$unloadfunction='swmenu='.$reopen.'swmenu.noclient=1;'; |
|
|
|
} |
|
return $result.(<<ENDFUNCTIONS); |
|
<script type="text/javascript"> |
|
function LONCAPAreg() { |
|
$loadfunction |
|
} |
|
|
|
function LONCAPAstale() { |
|
$unloadfunction |
|
} |
|
</script> |
|
$force_title |
|
ENDFUNCTIONS |
} |
} |
# Graphical display after login only |
# Graphical display after login only |
if ($Apache::lonxml::registered && !$forcereg) { return ''; } |
if ($Apache::lonxml::registered && !$forcereg) { return ''; } |