From: Dagfinn Ilmari Mannsåker Date: Thu, 10 Apr 2014 17:25:33 +0000 (+0100) Subject: Consider a single-value arrayref fixed X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d8b7d9f58;p=dbsrgits%2FDBIx-Class-Historic.git Consider a single-value arrayref fixed --- diff --git a/lib/DBIx/Class/Storage/DBIHacks.pm b/lib/DBIx/Class/Storage/DBIHacks.pm index 80283dc..3dba2f7 100644 --- a/lib/DBIx/Class/Storage/DBIHacks.pm +++ b/lib/DBIx/Class/Storage/DBIHacks.pm @@ -1009,6 +1009,8 @@ sub _extract_fixed_condition_columns { push @cols, $lhs if (defined $val and ( ! ref $val or + (ref $val eq 'ARRAY' and @$val == 1 and defined $val->[0]) + or (ref $val eq 'HASH' and keys %$val == 1 and defined $val->{'='}) )); }