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

raeburn lon-capa-cvs-allow@mail.lon-capa.org
Sun, 13 Jul 2008 09:40:49 -0000


raeburn		Sun Jul 13 05:40:49 2008 EDT

  Modified files:              
    /loncom/interface	loncreateuser.pm 
  Log:
  - No need for %userenv in selfcreatecase.
  - In cases besides selfcreate, no hiding of user information input fields in personal data table.  
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.252 loncom/interface/loncreateuser.pm:1.253
--- loncom/interface/loncreateuser.pm:1.252	Sat Jul 12 20:15:14 2008
+++ loncom/interface/loncreateuser.pm	Sun Jul 13 05:40:47 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.252 2008/07/13 00:15:14 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.253 2008/07/13 09:40:47 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1411,11 +1411,13 @@
             $rolesarray = \@inststatuses;
         }
     }
-    if (!$newuser || $context eq 'selfcreate') {
+    if (!$newuser) {
         # Get the users information
         %userenv = &Apache::lonnet::get('environment',
                    ['firstname','middlename','lastname','generation',
                     'permanentemail','id'],$ccdomain,$ccuname);
+    }
+    if (!$newuser) { || $context eq 'selfcreate') {
         %canmodify =
             &Apache::lonuserutils::can_modify_userinfo($context,$ccdomain,
                                                        \@userinfo,$rolesarray);
@@ -1460,6 +1462,8 @@
                         } else {
                             $hiderow = 1;
                         }
+                    } else {
+                        $row .= '<input type="text" name="c'.$item.'" size="'.$textboxsize{$item}.'" value="" />';
                     }
                 }
             } else {
@@ -1470,6 +1474,8 @@
                     } else {
                         $hiderow = 1;
                     }
+                } else {
+                    $row .= '<input type="text" name="c'.$item.'" size="'.$textboxsize{$item}.'" value="" />';
                 }
             }
         } else {