version 1.72, 2003/05/27 15:50:29
|
version 1.75, 2003/06/05 00:01:45
|
Line 188 sub registerurl {
|
Line 188 sub registerurl {
|
(!&Apache::lonnet::is_on_map($ENV{'REQUEST_URI'}))) && |
(!&Apache::lonnet::is_on_map($ENV{'REQUEST_URI'}))) && |
(!$forcereg))) { |
(!$forcereg))) { |
my $loadfunction=''; |
my $loadfunction=''; |
|
my $inlineloadfunction=''; |
my $unloadfunction=''; |
my $unloadfunction=''; |
unless (($ENV{'browser.interface'} eq 'textual') || |
unless (($ENV{'browser.interface'} eq 'textual') || |
($ENV{'environment.remote'} eq 'off') || |
($ENV{'environment.remote'} eq 'off') || |
($ENV{'request.publicaccess'})) { |
($ENV{'request.publicaccess'})) { |
my $reopen=&Apache::lonmenu::reopenmenu(); |
my $reopen=&Apache::lonmenu::reopenmenu(); |
$loadfunction='swmenu='.$reopen.'swmenu.windowloaded(self.name);'; |
$loadfunction='swmenu='.$reopen.'swmenu.windowloaded(self.name);window.focus();'; |
|
$inlineloadfunction=®flush(); |
$unloadfunction='swmenu='.$reopen.'swmenu.windowunloaded(self.name);'; |
$unloadfunction='swmenu='.$reopen.'swmenu.windowunloaded(self.name);'; |
} |
} |
return $result.(<<ENDFUNCTIONS); |
return $result.(<<ENDFUNCTIONS); |
Line 206 function LONCAPAstale() {
|
Line 208 function LONCAPAstale() {
|
$unloadfunction |
$unloadfunction |
} |
} |
</script> |
</script> |
|
$inlineloadfunction |
$force_title |
$force_title |
ENDFUNCTIONS |
ENDFUNCTIONS |
} |
} |
Line 395 ENDREGTEXT
|
Line 398 ENDREGTEXT
|
<script language="JavaScript"> |
<script language="JavaScript"> |
// BEGIN LON-CAPA Internal |
// BEGIN LON-CAPA Internal |
var swmenu=null; |
var swmenu=null; |
|
swmenu=$reopen; |
|
swmenu.windowloaded(self.name); |
|
|
function LONCAPAreg() { |
function LONCAPAreg() { |
swmenu=$reopen; |
swmenu=$reopen; |