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

Diff for /loncom/interface/lonmenu.pm between versions 1.148 and 1.149

version 1.148, 2005/02/18 21:23:12 version 1.149, 2005/02/21 00:32:04
Line 60  sub initlittle { Line 60  sub initlittle {
     return &Apache::lonlocal::texthash('ret' => 'Return to Last Location',      return &Apache::lonlocal::texthash('ret' => 'Return to Last Location',
        'nav' => 'Navigate Contents',         'nav' => 'Navigate Contents',
        'main' => 'Main Menu',         'main' => 'Main Menu',
                                          'roles' => ($ENV{'user.adv'}?
                                                       'Roles':'Courses'),
                                          'exit' => 'Exit',
        'launch' => 'Launch Remote Control');         'launch' => 'Launch Remote Control');
 }  }
   
Line 72  sub menubuttons { Line 75  sub menubuttons {
     my $titletable=shift;      my $titletable=shift;
     &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},      &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},
     ['inhibitmenu']);      ['inhibitmenu']);
     if ($ENV{'form.inhibitmenu'} eq 'yes') { return ''; }      if (($ENV{'form.inhibitmenu'} eq 'yes') ||
           ($ENV{'REQUEST_URI'} eq '/adm/logout')) { return ''; }
   
     my $navmaps='';      my $navmaps='';
     my $reloadlink='';      my $reloadlink='';
Line 103  ENDNAV Line 107  ENDNAV
 <a href="/adm/flip?postdata=$escreload" target="_top"><font color="$font">$lt{'ret'}</font></a>  <a href="/adm/flip?postdata=$escreload" target="_top"><font color="$font">$lt{'ret'}</font></a>
 ENDRELOAD  ENDRELOAD
             }              }
         }   }
         my $form=&serverform();          my $form=&serverform();
         my $utility=&utilityfunctions();          my $utility=&utilityfunctions();
  my $output=(<<ENDMAINMENU);   my $output=(<<ENDMAINMENU);
Line 113  $utility Line 117  $utility
 -->  -->
 </script>  </script>
 <a href="/adm/menu" target="_top">$lt{'main'}</a>  <a href="/adm/menu" target="_top">$lt{'main'}</a>
 $reloadlink $navmaps<br />  $reloadlink $navmaps
   <a href="/adm/roles" target="_top"><font color="$font">$lt{'roles'}</font></a>
   <a href="/adm/logout" target="_top"><font color="$font">$lt{'exit'}</font></a>
   <br />
 <script type="text/javascript">  <script type="text/javascript">
 // END LON-CAPA Internal  // END LON-CAPA Internal
 </script>  </script>
Line 196  $navmaps Line 203  $navmaps
 <a href="/adm/remote?action=launch&amp;url=$escurl" target="_top">  <a href="/adm/remote?action=launch&amp;url=$escurl" target="_top">
 <font color="$font">$lt{'launch'}</font></a></td>  <font color="$font">$lt{'launch'}</font></a></td>
 <td bgcolor="$tabbg">  <td bgcolor="$tabbg">
   <a href="/adm/roles" target="_top"><font color="$font">$lt{'roles'}</font></a>
   </td>
   <td bgcolor="$tabbg">
   <a href="/adm/logout" target="_top"><font color="$font">$lt{'exit'}</font></a>
   </td>
   <td bgcolor="$tabbg">
 <img align="right" src="$logo" />  <img align="right" src="$logo" />
 <b>LON-CAPA</b></td>  <b>LON-CAPA</b></td>
 $form  $form
Removed from v.1.148  
changed lines
  Added in v.1.149

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