Return to lonenc.pm CVS log | Up to [LON-CAPA] / loncom |
version 1.6, 2004/11/14 07:54:41 | version 1.7, 2004/11/16 15:26:36 |
---|---|
Line 112 sub check_encrypt { | Line 112 sub check_encrypt { |
sub check_decrypt { | sub check_decrypt { |
my ($str)=@_; | 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; | 1; |