--- loncom/interface/lonmenu.pm	2003/02/20 18:00:31	1.43
+++ loncom/interface/lonmenu.pm	2003/02/20 22:04:18	1.44
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.43 2003/02/20 18:00:31 www Exp $
+# $Id: lonmenu.pm,v 1.44 2003/02/20 22:04:18 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -49,7 +49,15 @@ sub menubuttons {
     my $registration=shift;
     unless ($ENV{'browser.interface'} eq 'textual') { return ''; }
 # 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); }
     return $output."<hr />";
 }