|
version 1.2, 2007/04/20 01:54:29
|
version 1.3, 2008/03/12 02:45:07
|
|
Line 71 sub real_handler {
|
Line 71 sub real_handler {
|
| "Select Action"); |
"Select Action"); |
| 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=&Apache::lonmenu::reopenmenu(); |
| my $navstatus=&Apache::lonmenu::get_nav_status(); |
my $navstatus=&Apache::lonmenu::get_nav_status(); |
| if ($menu) { |
if ($menu) { |
|
Line 110 ENDSUBM
|
Line 110 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=&Apache::lonmenu::reopenmenu(); |
| my $navstatus=&Apache::lonmenu::get_nav_status(); |
my $navstatus=&Apache::lonmenu::get_nav_status(); |
| if ($menu) { |
if ($menu) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonnavdisplay.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface