--- loncom/lonenc.pm 2006/09/28 20:47:13 1.17 +++ loncom/lonenc.pm 2006/12/08 22:04:57 1.18 @@ -1,7 +1,7 @@ # The LearningOnline Network # URL translation for encrypted filenames # -# $Id: lonenc.pm,v 1.17 2006/09/28 20:47:13 albertel Exp $ +# $Id: lonenc.pm,v 1.18 2006/12/08 22:04:57 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -109,7 +109,12 @@ sub encrypted { sub check_encrypt { my $str=shift; - if ($env{'request.enc'}) { return &Apache::lonenc::encrypted($str); } + if (ref($str)) { + if ($env{'request.enc'}) { $$str = &Apache::lonenc::encrypted($$str); } + return; + } else { + if ($env{'request.enc'}) { return &Apache::lonenc::encrypted($str); } + } return $str; }