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

raeburn lon-capa-cvs-allow@mail.lon-capa.org
Thu, 16 Aug 2007 21:36:14 -0000


raeburn		Thu Aug 16 17:36:14 2007 EDT

  Modified files:              
    /loncom/interface	loncreateuser.pm 
  Log:
  typo
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.173 loncom/interface/loncreateuser.pm:1.174
--- loncom/interface/loncreateuser.pm:1.173	Thu Aug 16 17:16:39 2007
+++ loncom/interface/loncreateuser.pm	Thu Aug 16 17:36:13 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.173 2007/08/16 21:16:39 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.174 2007/08/16 21:36:13 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1446,7 +1446,7 @@
             $changeHash{'middlename'} = $env{'form.cmiddlename'};
             $changeHash{'lastname'}   = $env{'form.clastname'};
             $changeHash{'generation'} = $env{'form.cgeneration'};
-            $changeHash{'permanentemail'} = $env{'form.permanentemail'};
+            $changeHash{'permanentemail'} = $env{'form.cpermanentemail'};
             my $putresult = &Apache::lonnet::put
                 ('environment',\%changeHash,
                  $env{'form.ccdomain'},$env{'form.ccuname'});