[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>');