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

[raeburn]

raeburn		Tue Sep  3 03:45:35 2024 EDT

  Modified files:              
    /loncom/interface	loncreateuser.pm 
  Log:
  - Show current status for webDAV access in "Authoring Space defaults" panel
    when a DC modifies a user.  
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.481 loncom/interface/loncreateuser.pm:1.482
--- loncom/interface/loncreateuser.pm:1.481	Sat Aug 31 21:12:45 2024
+++ loncom/interface/loncreateuser.pm	Tue Sep  3 03:45:35 2024
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.481 2024/08/31 21:12:45 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.482 2024/09/03 03:45:35 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -375,6 +375,12 @@
                 if ($userenv{'tools.'.$item} ne '') {
                     $cust_on = ' checked="checked" ';
                     $cust_off = '';
+                    $curr_access = $userenv{'tools.'.$item};
+                } else {
+                    $curr_access =
+                        &Apache::lonnet::usertools_access($ccuname,$ccdomain,$item,'reload',
+                                                          undef,\%userenv,'',
+                                                          {'is_adv' => $isadv});
                 }
             }
         } elsif ($userenv{$context.'.'.$item} ne '') {