loncom/interface/lonnavmaps.pm - diff

Return to lonnavmaps.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.274, 2004/08/10 20:52:03	version 1.275, 2004/08/13 20:12:11
Line 164 sub real_handler {	Line 164 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 $navstatus=&Apache::lonmenu::get_nav_status();
	if ($menu) {
	$menu=(<<MENU)
	swmenu=$menu
	swmenu.clearTimeout(swmenu.menucltim);
	$navstatus
	MENU
	}
$r->print(<<"ENDSUBM");	$r->print(<<"ENDSUBM");
<html>	<html>
<head>	<head>
<script type="text/javascript">	<script type="text/javascript">
function submitthis() {	function submitthis() {
	$menu
self.close();	self.close();
}	}

</script>	</script>
</head>	</head>
<body bgcolor="#FFFFFF" onLoad="submitthis()"></body>	<body bgcolor="#FFFFFF" onLoad="submitthis()"></body>