[LON-CAPA-cvs] cvs: loncom /publisher testbankimport.pm
raeburn
raeburn at source.lon-capa.org
Mon Apr 27 14:41:42 EDT 2026
raeburn Mon Apr 27 18:41:42 2026 EDT
Modified files:
/loncom/publisher testbankimport.pm
Log:
- WCAG 2 compliance
Include landmark for page's main content to support "Skip to main content"
Index: loncom/publisher/testbankimport.pm
diff -u loncom/publisher/testbankimport.pm:1.47 loncom/publisher/testbankimport.pm:1.48
--- loncom/publisher/testbankimport.pm:1.47 Mon Apr 27 18:12:14 2026
+++ loncom/publisher/testbankimport.pm Mon Apr 27 18:41:42 2026
@@ -1,5 +1,5 @@
# Handler for parsing text upload problem descriptions into .problems
-# $Id: testbankimport.pm,v 1.47 2026/04/27 18:12:14 raeburn Exp $
+# $Id: testbankimport.pm,v 1.48 2026/04/27 18:41:42 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1815,7 +1815,8 @@
}
my $output = &Apache::loncommon::start_page($title,$javascript,
{'bread_crumbs' => $brcrum,
- 'add_entries' => $loadentries});
+ 'add_entries' => $loadentries})
+ ."\n".'<div class="LC_landmark" role="main" id="LC_main_content">'."\n";
unless ($crsauthor) {
if (($uname ne $env{'user.name'}) || ($udom ne $env{'user.domain'})) {
$output .= '<p class="LC_info">'
@@ -1978,7 +1979,7 @@
} else {
&Apache::lonupload::phaseone($r,$fn,'testbank',$uname,$udom);
}
- $r->print(&Apache::loncommon::end_page());
+ $r->print('</div>'.&Apache::loncommon::end_page());
return OK;
}
More information about the LON-CAPA-cvs
mailing list