[BACK]Return to lonmenu.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonmenu.pm between versions 1.97 and 1.98

version 1.97, 2003/11/01 16:37:21 version 1.98, 2003/11/07 23:22:21
Line 66  sub initlittle { Line 66  sub initlittle {
 # ============================= This gets called at the top of the body section  # ============================= This gets called at the top of the body section
   
 sub menubuttons {  sub menubuttons {
     &Apache::lonlocal::reroutetrans();  
     my $forcereg=shift;      my $forcereg=shift;
     my $target  =shift;      my $target  =shift;
     my $registration=shift;      my $registration=shift;
Line 177  ENDINLINEMENU Line 176  ENDINLINEMENU
 # ====================================== This gets called in the header section  # ====================================== This gets called in the header section
   
 sub registerurl {  sub registerurl {
     &Apache::lonlocal::reroutetrans();  
     my $forcereg=shift;      my $forcereg=shift;
     my $target = shift;      my $target = shift;
     my $result = '';      my $result = '';
Line 213  sub registerurl { Line 211  sub registerurl {
 # =========== and in the body of the document  # =========== and in the body of the document
   
 sub innerregister {  sub innerregister {
     &Apache::lonlocal::reroutetrans();  
     my $forcereg=shift;      my $forcereg=shift;
     my $target = shift;      my $target = shift;
     my $result = '';      my $result = '';
Line 894  sub handler { Line 891  sub handler {
     $r->send_http_header;      $r->send_http_header;
     return OK if $r->header_only;      return OK if $r->header_only;
   
     &Apache::lonlocal::clearreroutetrans();  
   
     my $form=&serverform();      my $form=&serverform();
     my $bodytag=&Apache::loncommon::bodytag('Main Menu');      my $bodytag=&Apache::loncommon::bodytag('Main Menu');
     my $function='student';      my $function='student';
Line 928  $utility Line 923  $utility
 $bodytag  $bodytag
 ENDHEADER  ENDHEADER
     $r->print('<table>'.&inlinemenu().'</table>'.$form);      $r->print('<table>'.&inlinemenu().'</table>'.$form);
     $r->print(&Apache::lonlocal::endreroutetrans());  
     $r->print('</body></html>');      $r->print('</body></html>');
     return OK;      return OK;
 }  }
Removed from v.1.97  
changed lines
  Added in v.1.98

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>