diff options
Diffstat (limited to 'LedgerSMB/Template/HTML.pm')
-rwxr-xr-x | LedgerSMB/Template/HTML.pm | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/LedgerSMB/Template/HTML.pm b/LedgerSMB/Template/HTML.pm index 2f8ac427..6ec7b833 100755 --- a/LedgerSMB/Template/HTML.pm +++ b/LedgerSMB/Template/HTML.pm @@ -60,15 +60,14 @@ sub preprocess { for (@{$rawvars}) { push @{$vars}, preprocess( $_ ); } - } - elsif ( $type eq 'HASH' ) { + } elsif (!$type) { + return CGI::escapeHTML($rawvars); + } else { # Hashes and objects for ( keys %{$rawvars} ) { $vars->{preprocess($_)} = preprocess( $rawvars->{$_} ); } } - else { - return CGI::escapeHTML($rawvars); - } + return $vars; } |