Diff for /loncom/auth/lonacc.pm between versions 1.194 and 1.197

version 1.194, 2021/08/16 15:25:44 version 1.197, 2021/10/26 14:12:50
Line 388  sub sso_login { Line 388  sub sso_login {
                 $env{'request.deeplink.login'} = $r->uri;                  $env{'request.deeplink.login'} = $r->uri;
             }              }
             if ($env{'request.deeplink.login'}) {              if ($env{'request.deeplink.login'}) {
                 &Apache::lonnet::appenv({'request.deeplink.login' => $r->uri});  
                 if ($linkprot) {                  if ($linkprot) {
                     &Apache::lonnet::appenv({'request.linkprot' => $linkprot});                      $env{'request.linkprot'} = $linkprot;
                 } elsif ($linkkey ne '') {                  } elsif ($linkkey ne '') {
                     &Apache::lonnet::appenv({'request.linkkey' => $linkkey});                      $env{'request.linkkey'} = $linkkey;
                 }                  }
             }              }
             $env{'request.sso.login'} = 1;              $env{'request.sso.login'} = 1;
Line 514  sub handler { Line 513  sub handler {
     if ($handle eq '') {      if ($handle eq '') {
         unless ((($requrl eq '/adm/switchserver') && (!$r->is_initial_req())) ||          unless ((($requrl eq '/adm/switchserver') && (!$r->is_initial_req())) ||
                 ($requrl =~ m{^/public/$match_domain/$match_courseid/syllabus}) ||                  ($requrl =~ m{^/public/$match_domain/$match_courseid/syllabus}) ||
                 ($requrl =~ m{^/adm/help/}) ||                  ($requrl =~ m{^/adm/help/}) || ($requrl eq '/adm/sso') ||
                 ($requrl =~ m{^/res/$match_domain/$match_username/})) {                  ($requrl =~ m{^/res/$match_domain/$match_username/})) {
     $r->log_reason("Cookie not valid", $r->filename);      $r->log_reason("Cookie not valid", $r->filename);
         }          }

Removed from v.1.194  
changed lines
  Added in v.1.197


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>