loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.43, 2003/02/20 18:00:31	version 1.44, 2003/02/20 22:04:18
Line 49 sub menubuttons {	Line 49 sub menubuttons {
my $registration=shift;	my $registration=shift;
unless ($ENV{'browser.interface'} eq 'textual') { return ''; }	unless ($ENV{'browser.interface'} eq 'textual') { return ''; }
# Textual display only	# Textual display only
my $output='<a href="/adm/menu" target="_top">Main Menu</a><br />';	my $output=(<<ENDMAINMENU);
	<script>
	// BEGIN LON-CAPA Internal
	</script>
	<a href="/adm/menu" target="_top">Main Menu</a><br />
	<script>
	// END LON-CAPA Internal
	</script>
	ENDMAINMENU
if ($registration) { $output.=&innerregister($forcereg,$target); }	if ($registration) { $output.=&innerregister($forcereg,$target); }
return $output."<hr />";	return $output."<hr />";
}	}