version 1.335, 2005/08/02 20:51:18
|
version 1.336, 2005/08/02 21:15:51
|
Line 90 my %colormap =
|
Line 90 my %colormap =
|
my $hurryUpColor = "#FF0000"; |
my $hurryUpColor = "#FF0000"; |
|
|
sub launch_win { |
sub launch_win { |
my ($mode,$script,$toplinkitems)=@_; |
my ($mode,$script,$toplinkitems,$firsttime)=@_; |
my $result; |
my $result; |
if ($script ne 'no') { |
if ($script ne 'no') { |
$result.='<script type="text/javascript">'; |
$result.='<script type="text/javascript">'; |
} |
} |
$result.='function launch_navmapwin() { |
if ($firsttime) { |
|
$result.='function launch_navmapwin() { |
|
newWindow=open(\'/adm/navmaps?launchExternalRoles\',\'loncapanav\',\'width=400,height=600,scrollbars=1\'); |
|
}'; |
|
} else { |
|
$result.='function launch_navmapwin() { |
newWindow=open(\'/adm/navmaps?launchExternal\',\'loncapanav\',\'width=400,height=600,scrollbars=1\'); |
newWindow=open(\'/adm/navmaps?launchExternal\',\'loncapanav\',\'width=400,height=600,scrollbars=1\'); |
}'; |
}'; |
|
} |
if ($mode eq 'now') { |
if ($mode eq 'now') { |
$result.="\nlaunch_navmapwin();\n"; |
$result.="\nlaunch_navmapwin();\n"; |
} |
} |
Line 205 MENU
|
Line 211 MENU
|
ENDSUBM |
ENDSUBM |
return; |
return; |
} |
} |
if ($ENV{QUERY_STRING} eq '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(); |