version 1.13, 2009/09/08 20:56:47
|
version 1.14, 2010/03/10 21:25:50
|
Line 72 sub real_handler {
|
Line 72 sub real_handler {
|
if ($ENV{QUERY_STRING} eq 'collapseExternal') { |
if ($ENV{QUERY_STRING} eq 'collapseExternal') { |
&Apache::lonnet::put('environment',{'remotenavmap' => 'off'}); |
&Apache::lonnet::put('environment',{'remotenavmap' => 'off'}); |
&Apache::lonnet::appenv({'environment.remotenavmap' => 'off'}); |
&Apache::lonnet::appenv({'environment.remotenavmap' => 'off'}); |
my $menu=&Apache::lonmenu::reopenmenu(); |
my $menu=''; |
my $navstatus=&Apache::lonmenu::get_nav_status(); |
my $navstatus=&Apache::lonmenu::get_nav_status(); |
if ($menu) { |
my $nothing = &Apache::lonhtmlcommon::javascript_nothing(); |
$menu=(<<MENU) |
my $mainwindow='window.open('.$nothing.',"loncapaclient","",false);'; |
swmenu=$menu |
$menu=(<<MENU); |
swmenu.clearTimeout(swmenu.menucltim); |
swmenu=$mainwindow |
$navstatus |
$navstatus |
MENU |
|
} else { |
|
my $nothing = &Apache::lonhtmlcommon::javascript_nothing(); |
|
my $mainwindow='window.open('.$nothing.',"loncapaclient","",false);'; |
|
$menu=(<<MENU) |
|
swmenu=$mainwindow |
|
$navstatus |
|
MENU |
MENU |
} |
$r->send_http_header; |
$r->send_http_header; |
|
my $js =<<"ENDSUBM"; |
my $js =<<"ENDSUBM"; |
<script type="text/javascript"> |
<script type="text/javascript"> |
function submitthis() { |
function submitthis() { |
Line 111 ENDSUBM
|
Line 103 ENDSUBM
|
if ($ENV{QUERY_STRING} =~ /^launchExternal/) { |
if ($ENV{QUERY_STRING} =~ /^launchExternal/) { |
&Apache::lonnet::put('environment',{'remotenavmap' => 'on'}); |
&Apache::lonnet::put('environment',{'remotenavmap' => 'on'}); |
&Apache::lonnet::appenv({'environment.remotenavmap' => 'on'}); |
&Apache::lonnet::appenv({'environment.remotenavmap' => 'on'}); |
my $menu=&Apache::lonmenu::reopenmenu(); |
my $menu=''; |
my $navstatus=&Apache::lonmenu::get_nav_status(); |
my $navstatus=&Apache::lonmenu::get_nav_status(); |
if ($menu) { |
if ($menu) { |
$r->print(<<MENU); |
$r->print(<<MENU); |