[LON-CAPA-cvs] cvs: loncom /interface courseprefs.pm rat lonratmenu.pm
raeburn
raeburn at source.lon-capa.org
Sat Jan 10 06:39:16 EST 2026
raeburn Sat Jan 10 11:39:16 2026 EDT
Modified files:
/rat lonratmenu.pm
/loncom/interface courseprefs.pm
Log:
- WCAG 2 compliance
- Include sequential headings starting with <h1>.
Index: rat/lonratmenu.pm
diff -u rat/lonratmenu.pm:1.18.8.4.2.1 rat/lonratmenu.pm:1.18.8.4.2.2
--- rat/lonratmenu.pm:1.18.8.4.2.1 Fri May 27 18:00:59 2022
+++ rat/lonratmenu.pm Sun May 29 12:38:12 2022
@@ -2,7 +2,7 @@
# Build menu bar for Advanced RAT. Uses javascript code originally in
# static file: rat/client/code.html, now in rat/client/ratcode.js
#
-# $Id: lonratmenu.pm,v 1.18.8.4.2.1 2022/05/27 18:00:59 raeburn Exp $
+# $Id: lonratmenu.pm,v 1.18.8.4.2.2 2022/05/29 12:38:12 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -146,7 +146,8 @@
'Advanced Editor',
$js,
{'add_entries' => \%loaditem,
- 'bread_crumbs' => $brcrum,})
+ 'bread_crumbs' => $brcrum,
+ 'links_target' => '_parent',})
.&Apache::loncommon::head_subbox(
&Apache::loncommon::CSTR_pageheader('',$frameset)
Index: loncom/interface/courseprefs.pm
diff -u loncom/interface/courseprefs.pm:1.138 loncom/interface/courseprefs.pm:1.139
--- loncom/interface/courseprefs.pm:1.138 Tue Jan 6 16:42:02 2026
+++ loncom/interface/courseprefs.pm Sat Jan 10 11:39:16 2026
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set configuration settings for a course
#
-# $Id: courseprefs.pm,v 1.138 2026/01/06 16:42:02 raeburn Exp $
+# $Id: courseprefs.pm,v 1.139 2026/01/10 11:39:16 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -4662,8 +4662,8 @@
&Apache::lonrelrequtils::init_global_hashes();
if (defined($Apache::lonrelrequtils::checkcrstypes{$crstype})) {
($reqdmajor,$reqdminor) = split(/\./,$Apache::lonrelrequtils::checkcrstypes{$crstype});
- $output .= '<h4>'.&mt('Course type: [_1] requires [_2] or newer',$crstype,
- $Apache::lonrelrequtils::checkcrstypes{$crstype}).'</h4>';
+ $output .= '<h2 class="LC_heading_3">'.&mt('Course type: [_1] requires [_2] or newer',$crstype,
+ $Apache::lonrelrequtils::checkcrstypes{$crstype}).'</h2>';
}
my (%fromparam,%rowspan,%bymap,%byresource, at scopeorder,%toshow,%allmaps,
%byresponsetype,%bysubmission,%fromblocks,%bycrsrestype);
@@ -4826,7 +4826,7 @@
}
}
if (keys(%fromparam)) {
- $output .= '<h4>'.&mt('Requirements from general settings').'</h4>'.
+ $output .= '<h2 class="LC_heading_3">'.&mt('Requirements from general settings').'</h2>'.
&Apache::loncommon::start_data_table().
&Apache::loncommon::start_data_table_header_row().
'<th>'.&mt('Release').'</th><th>'.&mt('Scope').'</th>'.
@@ -4909,7 +4909,7 @@
printout => 'Printout generation',
timer => 'Timed quiz trigger',
);
- $output .= '<h4>'.&mt('Requirements from exam blocking').'</h4>'.
+ $output .= '<h2 class="LC_heading_3>'.&mt('Requirements from exam blocking').'</h2>'.
&Apache::loncommon::start_data_table().
&Apache::loncommon::start_data_table_header_row().
'<th>'.&mt('Release').'</th><th>'.&mt('Setting').'</th>'.
@@ -5044,14 +5044,14 @@
}
}
my $supptools = &Apache::lonnet::count_supptools($cnum,$cdom,1,1);
- my $mapres_header = '<h4>'.
+ my $mapres_header = '<h2 class="LC_heading_3">'.
&mt('Requirements for specific folders or resources').
- '</h4>';
+ '</h2>';
if ((keys(%toshow) > 0) || (keys(%byresource) > 0) ||
(keys(%bysubmission) > 0) || (keys(%byresponsetype))) {
$output .= $mapres_header;
}
- my $top_header = '<h3>'.&mt('LON-CAPA version dependencies').'</h3>';
+ my $top_header = '<h1 class="LC_heading_2">'.&mt('LON-CAPA version dependencies').'</h1>';
my $title = 'Version Constraints';
my $start_page =
&Apache::loncommon::start_page($title,undef,{'only_body' => 1,});
More information about the LON-CAPA-cvs
mailing list