--- loncom/interface/lonmenu.pm 2003/02/17 19:28:54 1.41 +++ loncom/interface/lonmenu.pm 2003/02/17 22:59:37 1.42 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.41 2003/02/17 19:28:54 www Exp $ +# $Id: lonmenu.pm,v 1.42 2003/02/17 22:59:37 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -204,12 +204,23 @@ ENDMENUITEMS } if ($textual) { # Registered, textual output + my $utility=&utilityfunctions(); + my $form=&serverform(); $result =(< +// BEGIN LON-CAPA Internal +$utility + $timesync $newmail $buttons $hwkadd $editbutton +$form + + ENDREGTEXT # Registered, graphical output } else { @@ -217,6 +228,7 @@ ENDREGTEXT $bodytag ENDHEADER - $r->print(&rawconfig(1)); + $r->print(&rawconfig(1).$form); $r->print(''); return OK; }