--- loncom/interface/lonsupportreq.pm 2025/02/17 18:48:06 1.107
+++ loncom/interface/lonsupportreq.pm 2025/02/25 05:35:26 1.108
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Helpdesk request form
#
-# $Id: lonsupportreq.pm,v 1.107 2025/02/17 18:48:06 raeburn Exp $
+# $Id: lonsupportreq.pm,v 1.108 2025/02/25 05:35:26 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -363,7 +363,7 @@ ENDJS
''.
&Apache::lonhtmlcommon::row_closure();
unless ($helpform{'username'} eq 'no') {
- my ($reqd,$namefield,$fullname);
+ my ($reqd,$aria_reqd,$namefield,$fullname);
if ((defined($lastname) && $lastname ne '') && (defined($firstname) && $firstname ne '')) {
$fullname = "$firstname $lastname";
$namefield = $fullname.'&').'" />'."\n";
@@ -373,10 +373,11 @@ ENDJS
} elsif (defined($lastname) && $lastname ne '') {
$fullname = " $lastname";
}
- $namefield = '&').'" />'."\n";
if ($helpform{'username'} eq 'req') {
$reqd = '*';
+ $aria_reqd = 'aria-required="true" ';
}
+ $namefield = '&').'" '.$aria_reqd.'/>'."\n";
}
my $title = '';
$output .= &Apache::lonhtmlcommon::row_title($title.$reqd,undef,$css[$num])."\n".$namefield.
@@ -392,7 +393,7 @@ ENDJS
'*'
,undef,$css[$i]).
'&').'" />'."\n";
+ &HTML::Entities::encode($email,'"<>&').'" aria-required="true" />'."\n";
unless ($shownsubmit) {
$output .= $topsubmit;
}
@@ -467,12 +468,13 @@ ENDJS
&Apache::lonhtmlcommon::row_closure();
}
unless ($helpform{'phone'} eq 'no') {
- my $reqd;
+ my ($reqd,$aria_reqd);
if ($helpform{'phone'} eq 'req') {
$reqd = '*';
+ $aria_reqd = 'aria-required="true" ';
}
$output .= &Apache::lonhtmlcommon::row_title(''.$reqd,undef,'LC_evenrow_value').
- '
'."\n".
+ '
'."\n".
&Apache::lonhtmlcommon::row_closure();
$num ++;
$i = $num%2;
@@ -546,13 +548,14 @@ ENDJS
$output .= ''."\n";
}
- my $reqd;
+ my ($reqd,$aria_reqd);
if ($helpform{'course'} eq 'req') {
$reqd = '*';
+ $aria_reqd = 'aria-required="true" ';
}
$output .= '