@@ -326,7 +326,7 @@ sub execute {

     $self->last_sql($query->sql);

     return $query if $query_return;

-    $filter ||= $query->filter;

+    $filter ||= $query->{filter} || {};

     # Tables

     unshift @$tables, @{$query->{tables} || []};

@@ -33,7 +33,7 @@ sub tables {

 #DEPRECATED!

 sub filter {

-    #warn "DBIx::Custom::Query filter method is DEPRECATED!";

+    Carp::carp "DBIx::Custom::Query filter method is DEPRECATED!";

     my $self = shift;

     if (@_) {

         my $filter = {};

@@ -67,7 +67,7 @@ sub filter {

                 $filter->{$column} = $filters->{$fname};

             }

         }

-        $self->{filter} = {%{$self->filter}, %$filter};

+        $self->{filter} = {%{$self->{filter} || {}}, %$filter};

         return $self;

     }

     return $self->{filter} ||= {};

@@ -6,7 +6,7 @@ use utf8;

 use Encode qw/encode_utf8 decode_utf8/;

 use Data::Dumper;

-#$SIG{__WARN__} = sub { warn $_[0] unless $_[0] =~ /DEPRECATED/};

+$SIG{__WARN__} = sub { warn $_[0] unless $_[0] =~ /DEPRECATED/};

 BEGIN {

     eval { require DBD::SQLite; 1 }