[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /auth lonroles.pm
raeburn
raeburn at source.lon-capa.org
Sun Jan 12 22:56:43 EST 2014
raeburn Mon Jan 13 03:56:43 2014 EDT
Modified files: (Branch: version_2_11_X)
/loncom/auth lonroles.pm
Log:
- For 2.11
- Backport 1.292.
Index: loncom/auth/lonroles.pm
diff -u loncom/auth/lonroles.pm:1.269.2.14 loncom/auth/lonroles.pm:1.269.2.15
--- loncom/auth/lonroles.pm:1.269.2.14 Sat Sep 21 23:42:59 2013
+++ loncom/auth/lonroles.pm Mon Jan 13 03:56:42 2014
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# User Roles Screen
#
-# $Id: lonroles.pm,v 1.269.2.14 2013/09/21 23:42:59 raeburn Exp $
+# $Id: lonroles.pm,v 1.269.2.15 2014/01/13 03:56:42 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -551,13 +551,14 @@
}
}
if (($env{'form.orgurl'}) &&
- ($env{'form.orgurl'}!~/^\/adm\/flip/)) {
+ ($env{'form.orgurl'}!~/^\/adm\/flip/) &&
+ ($env{'form.orgurl'} ne '/adm/roles')) {
my $dest=$env{'form.orgurl'};
if ($env{'form.symb'}) {
if ($dest =~ /\?/) {
$dest .= '&';
} else {
- $dest .= '?'
+ $dest .= '?';
}
$dest .= 'symb='.$env{'form.symb'};
}
More information about the LON-CAPA-cvs
mailing list