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

[raeburn]

raeburn		Mon Nov  1 13:54:00 2010 EDT

  Modified files:              (Branch: version_2_9_X)
    /loncom/interface	loncreateuser.pm 
  Log:
  - Backport 1.350.
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.295.2.35 loncom/interface/loncreateuser.pm:1.295.2.36
--- loncom/interface/loncreateuser.pm:1.295.2.35	Fri Aug 20 04:19:38 2010
+++ loncom/interface/loncreateuser.pm	Mon Nov  1 13:54:00 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.295.2.35 2010/08/20 04:19:38 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.295.2.36 2010/11/01 13:54:00 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1461,7 +1461,8 @@
             $rolesdump{$newkey} = $newvalue;
         }
     } else {
-        %rolesdump=&Apache::lonnet::dump('roles',$ccdomain,$ccuname);
+        my $extra = &Apache::lonnet::freeze_escape({'skipcheck' => 1});
+        %rolesdump=&Apache::lonnet::dump('roles',$ccdomain,$ccuname,'.',undef,$extra);
     }
     # Build up table of user roles to allow revocation and re-enabling of roles.
     my ($tmp) = keys(%rolesdump);