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

[raeburn]

raeburn		Thu Feb 29 14:09:30 2024 EDT

  Modified files:              
    /loncom/interface	loncreateuser.pm 
  Log:
  - Authoring Space defaults which domain coordinator can override for
    individual users.
    - Remove some duplicate definitions and assignments.
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.474 loncom/interface/loncreateuser.pm:1.475
--- loncom/interface/loncreateuser.pm:1.474	Fri Nov 17 17:02:20 2023
+++ loncom/interface/loncreateuser.pm	Thu Feb 29 14:09:30 2024
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.474 2023/11/17 17:02:20 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.475 2024/02/29 14:09:30 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -273,7 +273,7 @@
     my ($ccuname,$ccdomain,$context) = @_;
     my (@usertools,%userenv,$output, at options,%validations,%reqtitles,%reqdisplay,
         $colspan,$isadv,%domconfig, at defaulteditors, at customeditors, at custommanagers,
-        @possmanagers,$editorsty,$customsty);
+        @possmanagers);
     my %lt = &Apache::lonlocal::texthash (
                    'blog'       => "Personal User Blog",
                    'aboutme'    => "Personal Information Page",
@@ -337,7 +337,7 @@
     }
     foreach my $item (@usertools) {
         my ($custom_access,$curr_access,$cust_on,$cust_off,$tool_on,$tool_off,
-            $currdisp,$custdisp,$custradio,$onclick);
+            $currdisp,$custdisp,$custradio,$onclick,$customsty,$editorsty);
         $cust_off = 'checked="checked" ';
         $tool_on = 'checked="checked" ';
         unless (($context eq 'authordefaults') && ($item ne 'webdav')) {
@@ -468,7 +468,7 @@
                     $tool_off = 'checked="checked" ';
                     $tool_on = '';
                 }
-                $customsty = ' style="display:inline;"';
+                $customsty = ' style="display:block;"';
             }
         }
         $output .= '  <tr class="LC_info_row">'."\n".
@@ -476,16 +476,14 @@
                    '  </tr>'."\n".
                    &Apache::loncommon::start_data_table_row()."\n";
         if (($context eq 'requestcourses') || ($context eq 'requestauthor')) {
-            my ($curroption,$currlimit,$customsty);
+            my ($curroption,$currlimit);
             my $envkey = $context.'.'.$item;
             if ($context eq 'requestauthor') {
                 $envkey = $context;
             }
             if ($userenv{$envkey} ne '') {
                 $curroption = $userenv{$envkey};
-                $customsty = ' style="display:block"';
             } else {
-                $customsty = ' style="display:none"';
                 my (@inststatuses);
                 if ($context eq 'requestcourses') {
                     $curroption =