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

Diff for /loncom/interface/loncommon.pm between versions 1.925.2.1 and 1.925.2.3

version 1.925.2.1, 2009/12/07 17:11:49 version 1.925.2.3, 2009/12/08 05:00:15
Line 4527  sub bodytag { Line 4527  sub bodytag {
         if ($no_nav_bar || $env{'form.inhibitmenu'} eq 'yes') {           if ($no_nav_bar || $env{'form.inhibitmenu'} eq 'yes') { 
             return $bodytag;               return $bodytag; 
         }           } 
           my $custommenu = &needs_gci_custom(); 
   
         if ($env{'request.state'} eq 'construct') { $forcereg=1; }          if ($env{'request.state'} eq 'construct') { $forcereg=1; }
   
Line 4548  sub bodytag { Line 4549  sub bodytag {
         $bodytag .= qq|<div id="LC_nav_bar">$name $role</div>|;          $bodytag .= qq|<div id="LC_nav_bar">$name $role</div>|;
   
         $bodytag .= Apache::lonhtmlcommon::scripttag(          $bodytag .= Apache::lonhtmlcommon::scripttag(
             Apache::lonmenu::utilityfunctions(), 'start');              Apache::lonmenu::utilityfunctions('',$custommenu), 'start');
   
         $bodytag .= Apache::lonmenu::primary_menu();          $bodytag .= Apache::lonmenu::primary_menu();
   
Line 4559  sub bodytag { Line 4560  sub bodytag {
   
         #don't show menus for public users          #don't show menus for public users
         if($env{'user.name'} ne 'public' && $env{'user.domain'} ne 'public'){          if($env{'user.name'} ne 'public' && $env{'user.domain'} ne 'public'){
             $bodytag .= Apache::lonmenu::secondary_menu();              if ($custommenu) {
                   $bodytag .= &Apache::lonmenu::gci_secondary_menu();
               } else { 
                   $bodytag .= Apache::lonmenu::secondary_menu();
               }
             $bodytag .= Apache::lonmenu::serverform();              $bodytag .= Apache::lonmenu::serverform();
             $bodytag .= Apache::lonhtmlcommon::scripttag('', 'end');              $bodytag .= Apache::lonhtmlcommon::scripttag('', 'end');
             if ($env{'request.state'} eq 'construct') {              if ($env{'request.state'} eq 'construct') {
Line 10772  sub existing_gcitest_courses { Line 10777  sub existing_gcitest_courses {
         }          }
         my ($tstart,$tend) = split(':',$env{$envkey});          my ($tstart,$tend) = split(':',$env{$envkey});
         if (((!$tstart) || ($tstart < $now)) && ((!$tend) || ($tend > $now))) {          if (((!$tstart) || ($tstart < $now)) && ((!$tend) || ($tend > $now))) {
             my %coursehash = &Apache::lonnet::coursedescription($cdom.'/'.$cnum);              my $descr = $env{'course.'.$cdom.'_'.$cnum.'.description'};
             $courses{$cdom.'_'.$cnum}{'description'} = $coursehash{'description'};              if ($descr ne '') {
             $courses{$cdom.'_'.$cnum}{'owner'} = $coursehash{'internal.courseowner'};                  $courses{$cdom.'_'.$cnum}{'description'} = $descr;
             if (defined($coursehash{'default_enrollment_start_date'}) ) {  
                 $courses{$cdom.'_'.$cnum}{'startaccess'} =  
                     &Apache::lonlocal::locallocaltime($coursehash{'default_enrollment_start_date'});  
             }  
             if (defined($coursehash{'default_enrollment_end_date'}) ) {  
                 $courses{$cdom.'_'.$cnum}{'endaccess'} =  
                     &Apache::lonlocal::locallocaltime($coursehash{'default_enrollment_end_date'});  
                 if ($coursehash{'default_enrollment_end_date'} == 0) {  
                     $courses{$cdom.'_'.$cnum}{'endaccess'} = &mt('No ending date');  
                 }  
             }              }
         }          }
     }      }
Removed from v.1.925.2.1  
changed lines
  Added in v.1.925.2.3

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