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

Diff for /loncom/interface/lonnavdisplay.pm between versions 1.44 and 1.46

version 1.44, 2024/10/14 01:34:57 version 1.46, 2025/02/26 19:50:21
Line 129  ENDCLOSE Line 129  ENDCLOSE
     my $course_type = &Apache::loncommon::course_type();      my $course_type = &Apache::loncommon::course_type();
     if (($course_type eq 'Placement') && (!$env{'request.role.adv'})) {       if (($course_type eq 'Placement') && (!$env{'request.role.adv'})) { 
         my $furl = &Apache::lonpageflip::first_accessible_resource();          my $furl = &Apache::lonpageflip::first_accessible_resource();
         if ($result eq 'update') {          if (($result eq 'main') || ($result eq 'both')) {
             &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);              &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);
             $r->print($closure.&Apache::loncommon::end_page());              $r->print($closure.&Apache::loncommon::end_page());
             return OK;              return OK;
Line 160  ENDCLOSE Line 160  ENDCLOSE
     my $navmap = Apache::lonnavmaps::navmap->new();      my $navmap = Apache::lonnavmaps::navmap->new();
   
     if (!defined($navmap)) {      if (!defined($navmap)) {
         if ($result eq 'update') {          if (($result eq 'main') || ($result eq 'both')) {
             &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);              &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);
             $r->print($closure.&Apache::loncommon::end_page());              $r->print($closure.&Apache::loncommon::end_page());
         }          }
Line 170  ENDCLOSE Line 170  ENDCLOSE
         return HTTP_NOT_ACCEPTABLE;          return HTTP_NOT_ACCEPTABLE;
     }      }
   
     if ($result eq 'update') {      if (($result eq 'main') || ($result eq 'both')) {
         $r->rflush();          $r->rflush();
         &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);          &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);
         $r->print($closure);          $r->print($closure);
Line 183  ENDCLOSE Line 183  ENDCLOSE
     }      }
   
     &startContentScreen($r,'navmaps',$course_type);      &startContentScreen($r,'navmaps',$course_type);
     unless ($result eq 'update') {      unless (($result eq 'main') || ($result eq 'both')) {
         $r->rflush();          $r->rflush();
     }      }
   
Line 384  sub startpage { Line 384  sub startpage {
 sub startContentScreen {  sub startContentScreen {
     my ($r,$mode,$course_type)=@_;      my ($r,$mode,$course_type)=@_;
   
     $r->print("\n".'<ul class="LC_TabContentBigger" id="mainnav">'."\n");      $r->print("\n".'<div class="LC_landmark" role="main">'.
                 '<ul class="LC_TabContentBigger" id="mainnav">'."\n");
     $r->print('<li'.(($mode eq 'navmaps')?' class="active"':'').'><a href="/adm/navmaps"><b>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;'.&mt('Main Content').'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</b></a></li>'."\n");      $r->print('<li'.(($mode eq 'navmaps')?' class="active"':'').'><a href="/adm/navmaps"><b>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;'.&mt('Main Content').'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</b></a></li>'."\n");
     my $supptab;      my $supptab;
     if ($env{'request.role.adv'}) {      if ($env{'request.role.adv'}) {
Line 407  sub startContentScreen { Line 408  sub startContentScreen {
   
 sub endContentScreen {  sub endContentScreen {
    my ($r)=@_;     my ($r)=@_;
    $r->print('</div></div></div>');     $r->print('</div></div></div></div>');
 }  }
   
 1;  1;
Removed from v.1.44  
changed lines
  Added in v.1.46

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