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