[LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm

raeburn raeburn at source.lon-capa.org
Mon May 11 19:31:31 EDT 2026


raeburn		Mon May 11 23:31:31 2026 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  - WCAG 2 compliance: enclose radio buttons used to set sorting order of 
    printout in fieldset.
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.720 loncom/interface/lonprintout.pm:1.721
--- loncom/interface/lonprintout.pm:1.720	Sun Apr 19 03:47:18 2026
+++ loncom/interface/lonprintout.pm	Mon May 11 23:31:31 2026
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.720 2026/04/19 03:47:18 raeburn Exp $
+# $Id: lonprintout.pm,v 1.721 2026/05/11 23:31:31 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -282,14 +282,17 @@
 	$next_state) = @_;
     my $result = <<CHOOSE_STUDENTS;
   <state name="$this_state" title="Select Students and Resources">
-      <message><b>Select sorting order of printout</b> </message>
+    <message>
+      <fieldset class="LC_printout"> 
+        <legend>Select sorting order of printout</legend>
+    </message>
 
     <choices variable="$sort_choice">
       <choice computer='0'>Sort by section then student</choice>
       <choice computer='1'>Sort by students across sections.</choice>
     </choices>
 
-      <message><br /><hr /><br /> </message>
+      <message></fieldset><br /><hr /><br /> </message>
       <student multichoice='1'
                variable="$variable" 
                nextstate="$next_state" 
@@ -4737,12 +4740,16 @@
 	push(@{$printChoices}, [&mt('Selected [_1]Problems[_2] from [_3]entire course[_4] for [_5]selected people[_6]','<b>','</b>','<b>','</b>','<b>','</b>'), 'all_problems_students', 'ALL_PROBLEMS_STUDENTS']);
 my $suffixXml = <<ALL_PROBLEMS;
   <state name="STUDENTS1" title="Select People">
-      <message><b>Select sorting order of printout</b> </message>
+    <message>
+      <fieldset class="LC_printout">
+        <legend>Select sorting order of printout</legend>
+    </message>
+
     <choices variable='student_sort'>
       <choice computer='0'>Sort by section then student</choice>
       <choice computer='1'>Sort by students across sections.</choice>
     </choices>
-      <message><br /><hr /><br /> </message>
+      <message></fieldset><br /><hr /><br /> </message>
       <student multichoice='1' variable="STUDENTS" nextstate="PRINT_FORMATTING" coursepersonnel="1"/>
   </state>
 ALL_PROBLEMS




More information about the LON-CAPA-cvs mailing list