[LON-CAPA-cvs] cvs: loncom /auth lonroles.pm

raeburn raeburn at source.lon-capa.org
Sun Jan 5 06:02:50 EST 2014


raeburn		Sun Jan  5 11:02:50 2014 EDT

  Modified files:              
    /loncom/auth	lonroles.pm 
  Log:
  - Prevent roles page redirecting to itself.
  - Add missing ;
  
  
Index: loncom/auth/lonroles.pm
diff -u loncom/auth/lonroles.pm:1.291 loncom/auth/lonroles.pm:1.292
--- loncom/auth/lonroles.pm:1.291	Fri Aug 16 13:13:52 2013
+++ loncom/auth/lonroles.pm	Sun Jan  5 11:02:49 2014
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # User Roles Screen
 #
-# $Id: lonroles.pm,v 1.291 2013/08/16 13:13:52 raeburn Exp $
+# $Id: lonroles.pm,v 1.292 2014/01/05 11:02:49 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -545,13 +545,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