diff options
author | elliott_c <ocielliottc@users.noreply.github.com> | 2003-05-13 12:48:37 +0000 |
---|---|---|
committer | elliott_c <ocielliottc@users.noreply.github.com> | 2003-05-13 12:48:37 +0000 |
commit | e1fde9042d0c8be9e37d7db9db769a2ec844a2a9 (patch) | |
tree | 5cf5a5e17a9b66057b50d7bd1e724ab123fc6961 | |
parent | 815b6ade892b38b65e750136368d339b3c6a8a1a (diff) | |
download | MPC-e1fde9042d0c8be9e37d7db9db769a2ec844a2a9.tar.gz |
ChangeLogTag: Tue May 13 07:47:09 2003 Chad Elliott <elliott_c@ociweb.com>
-rw-r--r-- | modules/TemplateParser.pm | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/modules/TemplateParser.pm b/modules/TemplateParser.pm index 6fe8f198..ae007682 100644 --- a/modules/TemplateParser.pm +++ b/modules/TemplateParser.pm @@ -584,6 +584,24 @@ sub handle_if { $val = $self->get_value($val) } + if (defined $val) { + if (UNIVERSAL::isa($val, 'ARRAY')) { + my($empty) = 1; + foreach my $v (@$val) { + if ($v ne '') { + $empty = 0; + last; + } + } + if ($empty) { + $val = undef; + } + } + elsif ($val eq '') { + $val = undef; + } + } + if (!defined $val) { $self->{'if_skip'} = $true; } |