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

[raeburn]

raeburn		Sat Jan  4 23:21:22 2014 EDT

  Modified files:              
    /loncom/auth	lonacc.pm 
  Log:
  - SSO authentication in cases where server is not also a load balancer.
    - If authenticated, display the URL which triggered the original 
      authentication, unless, a symb was supplied in the query string, in 
      which case use that.
  
  
Index: loncom/auth/lonacc.pm
diff -u loncom/auth/lonacc.pm:1.150 loncom/auth/lonacc.pm:1.151
--- loncom/auth/lonacc.pm:1.150	Thu Dec 19 22:50:16 2013
+++ loncom/auth/lonacc.pm	Sat Jan  4 23:21:22 2014
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Cookie Based Access Handler
 #
-# $Id: lonacc.pm,v 1.150 2013/12/19 22:50:16 raeburn Exp $
+# $Id: lonacc.pm,v 1.151 2014/01/04 23:21:22 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -364,6 +364,11 @@
                     $info{$item} = $form{$item};
                 }
             }
+            unless ($info{'symb'}) {
+                unless ($r->uri eq '/adm/roles') {
+                    $info{'origurl'} = $r->uri; 
+                }
+            }
             if ($r->dir_config("ssodirecturl") == 1) {
                 $info{'origurl'} = $r->uri;
             }