[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