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

raeburn raeburn@source.lon-capa.org
Wed, 18 Mar 2009 15:31:46 -0000


raeburn		Wed Mar 18 15:31:46 2009 EDT

  Modified files:              (Branch: version_2_8_X)
    /loncom/interface	loncreateuser.pm 
  Log:
  - Backport 1.287.
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.268.2.7 loncom/interface/loncreateuser.pm:1.268.2.8
--- loncom/interface/loncreateuser.pm:1.268.2.7	Wed Mar 18 15:27:13 2009
+++ loncom/interface/loncreateuser.pm	Wed Mar 18 15:31:46 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.268.2.7 2009/03/18 15:27:13 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.268.2.8 2009/03/18 15:31:46 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1561,11 +1561,15 @@
                 }
             } else {
                 if ($context eq 'selfcreate') {
-                    if ($canmodify{$item}) {
-                        $row .= '<input type="text" name="c'.$item.'" size="'.$textboxsize{$item}.'" value="" />';
-                        $editable ++;
+                    if (($item eq 'permanentemail') && ($newuser eq 'email')) {
+                        $row .= $ccuname;
                     } else {
-                        $hiderow = 1;
+                        if ($canmodify{$item}) {
+                            $row .= '<input type="text" name="c'.$item.'" size="'.$textboxsize{$item}.'" value="" />';
+                            $editable ++;
+                        } else {
+                            $hiderow = 1;
+                        }
                     }
                 } else {
                     $row .= '<input type="text" name="c'.$item.'" size="'.$textboxsize{$item}.'" value="" />';