diff options
author | Yorhel <git@yorhel.nl> | 2009-11-06 00:29:10 +0100 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2009-11-06 00:29:10 +0100 |
commit | eb5970f52a3a0bdbd7077d3590a131b2fe604da5 (patch) | |
tree | c70a6016fadeeb58db095ad2388696fbdf532cea /lib | |
parent | 6f16fef07dd1e964a999d943719dfa07d61351a5 (diff) |
Multi::API: Fixed bug with accepting empty arrays as filter values
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Multi/API.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Multi/API.pm b/lib/Multi/API.pm index c94c120b..ddd907f1 100644 --- a/lib/Multi/API.pm +++ b/lib/Multi/API.pm @@ -84,9 +84,9 @@ sub filtertosql { # str : $_->[0] eq 'str' ? defined($value) && !ref($value) # inta - : $_->[0] eq 'inta' ? ref($value) eq 'ARRAY' && !grep(!defined($_) || ref($_) || $_ !~ /^-?\d+$/, @$value) + : $_->[0] eq 'inta' ? ref($value) eq 'ARRAY' && @$value && !grep(!defined($_) || ref($_) || $_ !~ /^-?\d+$/, @$value) # stra - : $_->[0] eq 'stra' ? ref($value) eq 'ARRAY' && !grep(!defined($_) || ref($_), @$value) + : $_->[0] eq 'stra' ? ref($value) eq 'ARRAY' && @$value && !grep(!defined($_) || ref($_), @$value) # oops : die "Invalid filter type $_->[0]" ), @$t)[0]; |