X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FTable.pm;h=71f41cb0d12119a11288ed7786cf2fc2497b80aa;hb=126042ee4b9394c4eecc6ece49469da6fce23ba3;hp=be871c0c831cb7610d4b82bdab05ea637d6b9878;hpb=39fe0e65163d92789ef01b7ce4530ff2e7b79eb2;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Table.pm b/lib/DBIx/Class/Table.pm index be871c0..71f41cb 100644 --- a/lib/DBIx/Class/Table.pm +++ b/lib/DBIx/Class/Table.pm @@ -373,17 +373,17 @@ sub copy { return $new->insert; } -sub _cond_resolve { - my ($self, $query, $attrs) = @_; - return '1 = 1' unless keys %$query; - my $op = $attrs->{'cmp'} || '='; - my $cond = join(' AND ', - map { (defined $query->{$_} - ? "$_ $op ?" - : (do { delete $query->{$_}; "$_ IS NULL"; })); - } keys %$query); - return ($cond, values %$query); -} +#sub _cond_resolve { +# my ($self, $query, $attrs) = @_; +# return '1 = 1' unless keys %$query; +# my $op = $attrs->{'cmp'} || '='; +# my $cond = join(' AND ', +# map { (defined $query->{$_} +# ? "$_ $op ?" +# : (do { delete $query->{$_}; "$_ IS NULL"; })); +# } keys %$query); +# return ($cond, values %$query); +#} =item table