--- loncom/lonenc.pm 2008/12/19 14:29:13 1.24 +++ loncom/lonenc.pm 2020/03/15 23:04:05 1.26 @@ -1,7 +1,7 @@ # The LearningOnline Network # URL translation for encrypted filenames # -# $Id: lonenc.pm,v 1.24 2008/12/19 14:29:13 raeburn Exp $ +# $Id: lonenc.pm,v 1.26 2020/03/15 23:04:05 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -116,9 +116,9 @@ sub remove_noise { } sub encrypted { - my ($uri,$force_enc) = @_; + my ($uri,$force_enc,$cid) = @_; if (!$force_enc && $env{'request.role.adv'}) { return($uri); } - my $seed=&encryptseed(); + my $seed=&encryptseed($cid); unless ($seed) { return $uri; } @@ -168,8 +168,10 @@ sub encrypt_ref { if ($href !~ /^https?\:/) { # IE really wants an extension my ($extension) = ($href =~ m/(\.[^.]*)$/); - $href = &Apache::lonenc::encrypted($href,$force_enc); - $href .= $extension; + my $newhref = &Apache::lonenc::encrypted($href,$force_enc); + unless ($newhref eq $href) { + $href = $newhref.$extension; + } } $token->[2]->{$name}=$href; }