![[BACK]](/icons/back.gif){kind=icon}
Return to lonenc.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom|
Return to lonenc.pm CVS log | Up to [LON-CAPA] / loncom |
| version 1.25, 2011/09/30 15:58:05 | version 1.26, 2020/03/15 23:04:05 |
|---|---|
| Line 116 sub remove_noise { | Line 116 sub remove_noise { |
| } | } |
| sub encrypted { | sub encrypted { |
| my ($uri,$force_enc) = @_; | my ($uri,$force_enc,$cid) = @_; |
| if (!$force_enc && $env{'request.role.adv'}) { return($uri); } | if (!$force_enc && $env{'request.role.adv'}) { return($uri); } |
| my $seed=&encryptseed(); | my $seed=&encryptseed($cid); |
| unless ($seed) { | unless ($seed) { |
| return $uri; | return $uri; |
| } | } |