--- loncom/interface/lonmenu.pm	2004/11/13 21:07:19	1.129
+++ loncom/interface/lonmenu.pm	2004/11/14 07:32:20	1.130
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.129 2004/11/13 21:07:19 albertel Exp $
+# $Id: lonmenu.pm,v 1.130 2004/11/14 07:32:20 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -96,6 +96,7 @@ ENDNAV
 ENDRELOAD
             }
         }
+        my $form=&serverform();
         my $utility=&utilityfunctions();
 	my $output=(<<ENDMAINMENU);
 <script type="text/javascript">
@@ -107,6 +108,7 @@ $reloadlink $navmaps<br />
 <script type="text/javascript">
 // END LON-CAPA Internal
 </script>
+$form
 ENDMAINMENU
         if ($registration) { $output.=&innerregister($forcereg,$target); }
 	return $output."<hr />";
@@ -153,6 +155,7 @@ ENDRELOAD
         if ($registration) {
            $reg=&innerregister($forcereg,$target);
         }
+        my $form=&serverform();
 	my $utility=&utilityfunctions();
 	return (<<ENDINLINEMENU);
 <script type="text/javascript">
@@ -172,6 +175,7 @@ $navmaps
 <td bgcolor="$tabbg">
 <img align="right" src="/adm/lonIcons/minilogo.gif" />
 <b>LON-CAPA</b></td>
+$form
 </tr>
 </table>
 </font>
@@ -406,7 +410,6 @@ ENDREALRES
         }
         if ($textual) {
 # Registered, textual output
-            my $form=&serverform();
 	    my $inlinebuttons='';
 
 	    if ($ENV{'browser.interface'} eq 'textual') {
@@ -430,7 +433,6 @@ $newmail
 $tablestart
 $inlinebuttons
 $tableend
-$form
 <script type="text/javascript">
 // END LON-CAPA Internal
 </script>
@@ -1057,7 +1059,11 @@ sub handler {
     $r->send_http_header;
     return OK if $r->header_only;
 
-    my $form=&serverform();
+    my $form;
+    if ($ENV{'environment.remote'} ne 'off' &&
+	$ENV{'browser.interface'} ne 'textual') {
+	$form=&serverform();
+    }
     my $bodytag=&Apache::loncommon::bodytag('Main Menu');
     my $function='student';
     if ($ENV{'request.role'}=~/^(cc|in|ta|ep)/) {