--- loncom/interface/lontiny.pm 2022/06/30 21:04:14 1.12 +++ loncom/interface/lontiny.pm 2022/07/02 17:17:47 1.13 @@ -2,7 +2,7 @@ # Extract domain, courseID, and symb from a shortened URL, # and switch role to a role in designated course. # -# $Id: lontiny.pm,v 1.12 2022/06/30 21:04:14 raeburn Exp $ +# $Id: lontiny.pm,v 1.13 2022/07/02 17:17:47 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -401,12 +401,12 @@ sub launch_check { if ($linkprotector) { &Apache::lonnet::appenv({'request.linkprot' => $linkprotector.':'.$linkproturi}); } elsif ($env{'request.linkprot'}) { - &Apache::lonnet::delenv({'request.linkprot'}); + &Apache::lonnet::delenv('request.linkprot); } if ($linkkey ne '') { &Apache::lonnet::appenv({'request.linkkey' => $linkkey}); } elsif ($env{'request.linkkey'} ne '') { - &Apache::lonnet::delenv({'request.linkkey'}); + &Apache::lonnet::delenv('request.linkkey'); } $newlauncher = 1; } @@ -422,12 +422,12 @@ sub launch_check { if ($linkprotector) { &Apache::lonnet::appenv({'request.linkprot' => $linkprotector.':'.$linkproturi}); } elsif ($env{'request.linkprot'}) { - &Apache::lonnet::delenv({'request.linkprot'}); + &Apache::lonnet::delenv('request.linkprot); } if ($linkkey ne '') { &Apache::lonnet::appenv({'request.linkkey' => $linkkey}); } else { - &Apache::lonnet::delenv({'request.linkkey'}); + &Apache::lonnet::delenv('request.linkkey'); } &Apache::lonnet::appenv({'request.deeplink.login' => $linkuri}); if ($env{'request.deeplink.target'} ne '') {