loncom/auth/switchserver.pm - diff

Return to switchserver.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.38, 2017/11/30 15:14:51	version 1.39, 2018/03/23 01:01:29
Line 180 sub handler {	Line 180 sub handler {
my $logmsg = "Switch Server to $env{'form.otherserver'}";	my $logmsg = "Switch Server to $env{'form.otherserver'}";
if ($env{'form.role'}) {	if ($env{'form.role'}) {
$logmsg .= " with role: $env{'form.role'}";	$logmsg .= " with role: $env{'form.role'}";
	} elsif (($env{'form.lti.reqcrs'}) && ($env{'form.lti.reqrole'} eq 'cc')) {
	$logmsg .= " to create new LTI course";
	} elsif ($env{'form.lti.selfenrollrole'}) {
	$logmsg .= " to selfenroll with role: $env{'form.lti.selfenrollrole'}";
} else {	} else {
$logmsg .= " (no role)";	$logmsg .= " (no role)";
}	}
Line 231 sub handler {	Line 235 sub handler {
if ($env{'request.lti.login'}) {	if ($env{'request.lti.login'}) {
$info{'lti.login'} = $env{'request.lti.login'};	$info{'lti.login'} = $env{'request.lti.login'};
}	}
	if ($env{'request.lti.reqcrs'}) {
	$info{'lti.reqcrs'} = $env{'request.lti.reqcrs'};
	}
	if ($env{'request.lti.reqrole'}) {
	$info{'lti.reqrole'} = $env{'request.lti.reqrole'};
	}
	if ($env{'request.lti.selfenrollrole'}) {
	$info{'lti.selfenrollrole'} = $env{'request.lti.selfenrollrole'};
	}
	if ($env{'request.lti.sourcecrs'}) {
	$info{'lti.sourcecrs'} = $env{'request.lti.sourcecrs'};
	}
if ($env{'request.lti.passbackid'}) {	if ($env{'request.lti.passbackid'}) {
$info{'lti.passbackid'} = $env{'request.lti.passbackid'};	$info{'lti.passbackid'} = $env{'request.lti.passbackid'};
}	}