[LON-CAPA-cvs] cvs: loncom /interface loncoursequeueadmin.pm
raeburn
raeburn at source.lon-capa.org
Mon Dec 22 20:23:42 EST 2025
raeburn Tue Dec 23 01:23:42 2025 EDT
Modified files:
/loncom/interface loncoursequeueadmin.pm
Log:
- WCAG 2 compliance
Index: loncom/interface/loncoursequeueadmin.pm
diff -u loncom/interface/loncoursequeueadmin.pm:1.70 loncom/interface/loncoursequeueadmin.pm:1.71
--- loncom/interface/loncoursequeueadmin.pm:1.70 Tue Mar 18 18:57:28 2025
+++ loncom/interface/loncoursequeueadmin.pm Tue Dec 23 01:23:42 2025
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Utilities to administer domain course requests and course self-enroll requests
#
-# $Id: loncoursequeueadmin.pm,v 1.70 2025/03/18 18:57:28 raeburn Exp $
+# $Id: loncoursequeueadmin.pm,v 1.71 2025/12/23 01:23:42 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -817,13 +817,25 @@
}
unless (($context eq 'pending') || ($context eq 'displaypending') ||
($context eq 'helpdesk')) {
- $row = '<td><span class="LC_nobreak"><label>'.
+ my $legend;
+ if ($context eq 'othdomaction') {
+ if ($secondary eq 'domain') {
+ $legend = &mt('Action to take for request from: [_1]',$namelink);
+ } else {
+ $legend = &mt('Action to take');
+ }
+ } else {
+ $legend = &mt('Action to take for request from: [_1]',$namelink);
+ }
+ $row = '<td><fieldset class="LC_borderless">'.
+ '<legend class="LC_visually_hidden">'.$legend.'</legend>'.
+ '<span class="LC_nobreak"><label>'.
'<input type="radio" value="'.$approve.'" name="'.$count.'radioreq" />'.&mt('Approve').'</label>'.
'<label>'.(' 'x2).
'<input type="radio" value="'.$reject.'" name="'.$count.'radioreq" />'.&mt('Reject').'</label>'.
'<label>'.(' 'x2).
'<input type="radio" value="'."later:".$reject.'" name="'.$count.'radioreq" checked />'.&mt('Decide Later').
- '</label></span><br /></td>';
+ '</label></span></fieldset><br /></td>';
}
unless ($context eq 'othdomaction') {
$row .= '<td>'.$namelink.'</td>'."\n";
More information about the LON-CAPA-cvs
mailing list