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

[raeburn]

raeburn		Mon Dec  1 06:23:49 2025 EDT

  Modified files:              
    /loncom/interface	loncreateuser.pm 
  Log:
  - Satisfy w3c validation.
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.485 loncom/interface/loncreateuser.pm:1.486
--- loncom/interface/loncreateuser.pm:1.485	Tue Mar 18 18:57:28 2025
+++ loncom/interface/loncreateuser.pm	Mon Dec  1 06:23:49 2025
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.485 2025/03/18 18:57:28 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.486 2025/12/01 06:23:49 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -10507,9 +10507,9 @@
 &Apache::loncommon::start_data_table().
 &Apache::loncommon::start_data_table_header_row().
 '<th>'.$lt{'act'}.'</th><th>'.$lt{'rol'}.'</th>'."\n".
-'<th>'.$lt{'ext'}.'</th><th>'."\n";
+'<th>'.$lt{'ext'}.'</th>'."\n";
     if ($showcredits) {
-        $result .= $lt{'crd'}.'</th>';
+        $result .= '<th>'.$lt{'crd'}.'</th>';
     }
     $result .=
 '<th>'.$lt{'grs'}.'</th><th>'.$lt{'sta'}.'</th>'."\n".
@@ -10529,12 +10529,14 @@
               $protectedcourse.'_'.$role.'" /></td>'."\n".
               ' <td>'.$plrole.'</td>'."\n".
               ' <td>'.$area.'<br />Domain: '.$domain.'</td>'."\n";
-    if (($showcredits) && ($role eq 'st') && ($crstype eq 'Course')) {
-        $row .= 
-            '<td><input type="text" name="credits_'.$protectedcourse.'_'.
-            $role.'" size="3" value="'.$defaultcredits.'" /></td>';
-    } else {
-        $row .= '<td> </td>';
+    if ($showcredits) {
+        if (($role eq 'st') && ($crstype eq 'Course')) {
+            $row .= 
+                '<td><input type="text" name="credits_'.$protectedcourse.'_'.
+                $role.'" size="3" value="'.$defaultcredits.'" /></td>';
+        } else {
+            $row .= '<td> </td>';
+        }
     }
     if (($role eq 'cc') || ($role eq 'co')) {
         $row .= '<td> </td>';