loncom/lontrans.pm - diff

Return to lontrans.pm CVS log

Up to [LON-CAPA] / loncom

version 1.38, 2021/12/06 03:31:54	version 1.39, 2022/06/18 02:10:19
Line 276 sub set_token {	Line 276 sub set_token {
my %link_info = &Apache::lonnet::tmpget($info{'ltoken'});	my %link_info = &Apache::lonnet::tmpget($info{'ltoken'});
if ($link_info{'linkprot'}) {	if ($link_info{'linkprot'}) {
$info{'linkprot'} = $link_info{'linkprot'};	$info{'linkprot'} = $link_info{'linkprot'};
	if ($link_info{'linkprotuser'} ne '') {
	$info{'linkprotuser'} = $link_info{'linkprotuser'};
	}
}	}
&Apache::lonnet::tmpdel($info{'ltoken'});;	&Apache::lonnet::tmpdel($info{'ltoken'});
delete($info{'ltoken'});	delete($info{'ltoken'});
}	}
unless ($info{'role'}) {	unless ($info{'role'}) {