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

raeburn raeburn@source.lon-capa.org
Sat, 05 Sep 2009 01:14:32 -0000


raeburn		Sat Sep  5 01:14:32 2009 EDT

  Modified files:              
    /loncom/interface	selfenroll.pm 
  Log:
  - Third arg to lonnet::set_userprivs() is a ref to a hash.
  
  
Index: loncom/interface/selfenroll.pm
diff -u loncom/interface/selfenroll.pm:1.22 loncom/interface/selfenroll.pm:1.23
--- loncom/interface/selfenroll.pm:1.22	Thu Aug 20 22:07:18 2009
+++ loncom/interface/selfenroll.pm	Sat Sep  5 01:14:32 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Allow users to self-enroll in a course
 #
-# $Id: selfenroll.pm,v 1.22 2009/08/20 22:07:18 raeburn Exp $
+# $Id: selfenroll.pm,v 1.23 2009/09/05 01:14:32 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -476,7 +476,7 @@
                 }
                 &Apache::lonnet::standard_roleprivs(\%newrole,$role,$cdom,$spec,$cnum,
                                                     $area);
-                &Apache::lonnet::set_userprivs(\%userroles,\%newrole,%newgroups);
+                &Apache::lonnet::set_userprivs(\%userroles,\%newrole,\%newgroups);
                 $userroles{'user.role.'.$spec} = $selfenroll_access_start.'.'.$selfenroll_access_end;
                 &Apache::lonnet::appenv(\%userroles,[$role,'cm']);
                 $r->print('<h3>'.&mt('Enrollment process complete').'</h3>');