--- loncom/lontrans.pm 2021/12/06 03:31:54 1.38 +++ loncom/lontrans.pm 2022/06/18 02:10:19 1.39 @@ -1,7 +1,7 @@ # The LearningOnline Network # URL translation for User Files # -# $Id: lontrans.pm,v 1.38 2021/12/06 03:31:54 raeburn Exp $ +# $Id: lontrans.pm,v 1.39 2022/06/18 02:10:19 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -276,8 +276,11 @@ sub set_token { my %link_info = &Apache::lonnet::tmpget($info{'ltoken'}); if ($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'}); } unless ($info{'role'}) {