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

[raeburn]

raeburn		Mon Dec  7 04:38:22 2009 EDT

  Modified files:              (Branch: GCI_3)
    /loncom/auth	lonroles.pm 
  Log:
  - Customization for GCI_3.
    - If no role, redirect to orgurl (if specified as a form element).
  
  
Index: loncom/auth/lonroles.pm
diff -u loncom/auth/lonroles.pm:1.240.2.1 loncom/auth/lonroles.pm:1.240.2.2
--- loncom/auth/lonroles.pm:1.240.2.1	Sun Dec  6 19:47:47 2009
+++ loncom/auth/lonroles.pm	Mon Dec  7 04:38:22 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # User Roles Screen
 #
-# $Id: lonroles.pm,v 1.240.2.1 2009/12/06 19:47:47 raeburn Exp $
+# $Id: lonroles.pm,v 1.240.2.2 2009/12/07 04:38:22 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -318,6 +318,9 @@
                 }
             }
         }
+        if (($env{'form.cm'}) && ($env{'form.orgurl'})) {
+            $r->internal_redirect($env{'form.orgurl'});
+        }
 
         foreach $envkey (keys %env) {
             next if ($envkey!~/^user\.role\./);