[LON-CAPA-cvs] cvs: loncom(GCI_3) /interface loncommon.pm
raeburn
raeburn@source.lon-capa.org
Mon, 18 Jan 2010 15:44:36 -0000
raeburn Mon Jan 18 15:44:36 2010 EDT
Modified files: (Branch: GCI_3)
/loncom/interface loncommon.pm
Log:
- Call to &appenv() moved to occur after call to &set_userprivs().
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.925.2.9 loncom/interface/loncommon.pm:1.925.2.10
--- loncom/interface/loncommon.pm:1.925.2.9 Sat Jan 16 19:56:54 2010
+++ loncom/interface/loncommon.pm Mon Jan 18 15:44:35 2010
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.925.2.9 2010/01/16 19:56:54 raeburn Exp $
+# $Id: loncommon.pm,v 1.925.2.10 2010/01/18 15:44:35 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -10739,9 +10739,9 @@
}
}
if (@newroles) {
- &Apache::lonnet::appenv(\%userroles,[@newroles,'cm']);
my ($author,$adv) = &Apache::lonnet::set_userprivs(\%userroles,\%allroles,
\%allgroups);
+ &Apache::lonnet::appenv(\%userroles,[@newroles,'cm']);
$userenv{'user.adv'} = $adv;
$userenv{'user.author'} = $author;
$userenv{'user.refresh.time'} = $refresh;