[LON-CAPA-cvs] cvs: loncom /auth migrateuser.pm
raeburn
raeburn at source.lon-capa.org
Wed Feb 23 19:13:54 EST 2022
raeburn Thu Feb 24 00:13:54 2022 EDT
Modified files:
/loncom/auth migrateuser.pm
Log:
- Bug 6907
- When access is launched for a user from a deeplink, and user already has
a session active, update required session information if the existing
session was from a different launch, or was from normal login access.
Index: loncom/auth/migrateuser.pm
diff -u loncom/auth/migrateuser.pm:1.57 loncom/auth/migrateuser.pm:1.58
--- loncom/auth/migrateuser.pm:1.57 Sun Feb 6 21:37:04 2022
+++ loncom/auth/migrateuser.pm Thu Feb 24 00:13:54 2022
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Starts a user off based of an existing token.
#
-# $Id: migrateuser.pm,v 1.57 2022/02/06 21:37:04 raeburn Exp $
+# $Id: migrateuser.pm,v 1.58 2022/02/24 00:13:54 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -722,20 +722,14 @@
$handle);
my $checklaunch;
if ($data{'origurl'} =~ m{^/tiny/$match_domain/\w+$}) {
- if ($env{'request.linkprot'} ne '') {
- unless ($env{'request.linkprot'} eq $data{'linkprot'}) {
- $checklaunch = 1;
- }
- }
- if ($env{'request.linkkey'} ne '') {
- unless ($env{'request.linkkey'} eq $data{'linkkey'}) {
- $checklaunch = 1;
- }
+ unless ($env{'request.linkprot'} eq $data{'linkprot'}) {
+ $checklaunch = 1;
}
- if ($env{'request.deeplink.login'}) {
- unless ($env{'request.deeplink.login'} eq $data{'deeplink.login'}) {
- $checklaunch = 1;
- }
+ unless ($env{'request.linkkey'} eq $data{'linkkey'}) {
+ $checklaunch = 1;
+ }
+ unless ($env{'request.deeplink.login'} eq $data{'deeplink.login'}) {
+ $checklaunch = 1;
}
}
if ($data{'linkprot'} ne '') {
More information about the LON-CAPA-cvs
mailing list