loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.203, 2006/08/14 09:11:55	version 1.204, 2006/08/14 09:28:56
Line 499 ENDREALRES	Line 499 ENDREALRES
s&8&3&prt.gif&prepare[_1]&printout[_1]&gopost('/adm/printout',currentURL)&Prepare a printable document	s&8&3&prt.gif&prepare[_1]&printout[_1]&gopost('/adm/printout',currentURL)&Prepare a printable document
ENDMENUITEMS	ENDMENUITEMS
}	}
&Apache::lonnet::logthis("Menu items:\n$menuitems\n");
my $buttons='';	my $buttons='';
foreach (split(/\n/,$menuitems)) {	foreach (split(/\n/,$menuitems)) {
my ($command,@rest)=split(/\&/,$_);	my ($command,@rest)=split(/\&/,$_);
Line 509 ENDMENUITEMS	Line 508 ENDMENUITEMS
$buttons.=&clear(@rest);	$buttons.=&clear(@rest);
}	}
}	}
&Apache::lonnet::logthis("buttons = $buttons");

if ($textual) {	if ($textual) {
my $addremote=0;	my $addremote=0;
Line 531 ENDMENUITEMS	Line 529 ENDMENUITEMS
ENDINLINE	ENDINLINE
}	}
}	}
&Apache::lonnet::logthis("Inline:\n $inlinebuttons \n");
$result =(<<ENDREGTEXT);	$result =(<<ENDREGTEXT);
<script type="text/javascript">	<script type="text/javascript">
// BEGIN LON-CAPA Internal	// BEGIN LON-CAPA Internal