--- loncom/lonenc.pm 2004/11/11 20:05:56 1.5 +++ loncom/lonenc.pm 2004/11/14 07:54:41 1.6 @@ -1,7 +1,7 @@ # The LearningOnline Network # URL translation for encrypted filenames # -# $Id: lonenc.pm,v 1.5 2004/11/11 20:05:56 albertel Exp $ +# $Id: lonenc.pm,v 1.6 2004/11/14 07:54:41 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -110,6 +110,11 @@ sub check_encrypt { return $str; } +sub check_decrypt { + my ($str)=@_; + if ($$str=~m|^/enc/|) { $$str=&Apache::lonenc::unencrypted($$str); } +} + 1; __END__