[LON-CAPA-cvs] cvs: rat / lonsequence.pm

[raeburn]

raeburn		Wed Jan 21 15:35:04 2026 EDT

  Modified files:              
    /rat	lonsequence.pm 
  Log:
  - WCAG 2 compliance
   - Include landmark for page's main content to support "Skip to main content".
  
  
Index: rat/lonsequence.pm
diff -u rat/lonsequence.pm:1.59 rat/lonsequence.pm:1.60
--- rat/lonsequence.pm:1.59	Sat Oct 29 18:13:29 2022
+++ rat/lonsequence.pm	Wed Jan 21 15:35:04 2026
@@ -2,7 +2,7 @@
 #
 # Sequence Handler
 #
-# $Id: lonsequence.pm,v 1.59 2022/10/29 18:13:29 raeburn Exp $
+# $Id: lonsequence.pm,v 1.60 2026/01/21 15:35:04 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -306,7 +306,8 @@
                    $args = {'bread_crumbs' => \@crumbs,
                             'bread_crumbs_nomenu' => 1,
                             'no_auto_mt_title' => 1};
-                   $r->print(&Apache::loncommon::start_page($maptitle,undef,$args));
+                   $r->print(&Apache::loncommon::start_page($maptitle,undef,$args)."\n".
+                             '<div class="LC_landmark" role="main" id="LC_main_content">'."\n");
 
                    my $renderArgs = { 'cols'                    => [0,1,2,3],
                                       'url'                     => $mapurl,
@@ -329,19 +330,23 @@
                                  &mt('No items found in folder').
                                  '</p>');
                    }
-                   $r->print(&Apache::loncommon::end_page());
+                   $r->print('</div>'.&Apache::loncommon::end_page());
                } else {
-                   $r->print(&Apache::loncommon::start_page($maptitle,undef,$args).
+                   $r->print(&Apache::loncommon::start_page($maptitle,undef,$args)."\n".
+                             '<div class="LC_landmark" role="main" id="LC_main_content">'."\n".
                              '<p class="LC_info">'.
                              &mt('Folder no longer appears to be a part of the course').
                              '</p>'.
+                             '</div>'.
                              &Apache::loncommon::end_page());
                }
            } else {
-               $r->print(&Apache::loncommon::start_page($maptitle,undef,$args).
+               $r->print(&Apache::loncommon::start_page($maptitle,undef,$args)."\n".
+                         '<div class="LC_landmark" role="main" id="LC_main_content">'."\n".
                          '<p class="LC_warning">'.
                          &mt('Error: could not determine contents of folder').
                          '</p>'.
+                         '</div>'.
                          &Apache::loncommon::end_page());
            }
            $r->rflush();