@@ -1,4 +1,9 @@

+0.1692

+    - EXPERIMENTAL type_rule_off is not passed form execute method 

+      to DBIx::Custom::Result object

 0.1691

+    - DBIx::Custom::Result end_filter, remove_filter, remove_end_filter is DEPRECATED!

+    - apply_filter is DEPRECATED!

     - EXPERIMETAL column method and table_alias think about "-" separator

     - EXPERIMTANL column method think about separator

     - removed EXPERIMENTAL col method.

@@ -1,6 +1,6 @@

 package DBIx::Custom;

-our $VERSION = '0.1690';

+our $VERSION = '0.1691';

 use 5.008001;

 use Object::Simple -base;

@@ -522,7 +522,6 @@ sub execute {

             filter => $filter->{in} || {},

             end_filter => $filter->{end} || {},

             type_rule => $self->type_rule,

-            type_rule_off => $type_rule_off

         );

         return $result;

@@ -1908,49 +1907,6 @@ and implements the following new ones.

 Get available data type.

-=head2 C<apply_filter> DEPRECATED!

-

-    $dbi->apply_filter(

-        'book',

-        'issue_date' => {

-            out => 'tp_to_date',

-            in  => 'date_to_tp',

-            end => 'tp_to_displaydate'

-        },

-        'write_date' => {

-            out => 'tp_to_date',

-            in  => 'date_to_tp',

-            end => 'tp_to_displaydate'

-        }

-    );

-

-Apply filter to columns.

-C<out> filter is executed before data is send to database.

-C<in> filter is executed after a row is fetch.

-C<end> filter is execute after C<in> filter is executed.

-

-Filter is applied to the follwoing tree column name pattern.

-

-       PETTERN         EXAMPLE

-    1. Column        : author

-    2. Table.Column  : book.author

-    3. Table__Column : book__author

-    4. Table-Column  : book-author

-

-If column name is duplicate with other table,

-Main filter specified by C<table> option is used.

-

-You can set multiple filters at once.

-

-    $dbi->apply_filter(

-        'book',

-        [qw/issue_date write_date/] => {

-            out => 'tp_to_date',

-            in  => 'date_to_tp',

-            end => 'tp_to_displaydate'

-        }

-    );

-

 =head2 C<assign_param> EXPERIMENTAL

     my $assign_param = $dbi->assign_param({title => 'a', age => 2});

@@ -2887,6 +2843,49 @@ Column names is

     ['title', 'author']

+=head2 C<apply_filter> DEPRECATED!

+

+    $dbi->apply_filter(

+        'book',

+        'issue_date' => {

+            out => 'tp_to_date',

+            in  => 'date_to_tp',

+            end => 'tp_to_displaydate'

+        },

+        'write_date' => {

+            out => 'tp_to_date',

+            in  => 'date_to_tp',

+            end => 'tp_to_displaydate'

+        }

+    );

+

+Apply filter to columns.

+C<out> filter is executed before data is send to database.

+C<in> filter is executed after a row is fetch.

+C<end> filter is execute after C<in> filter is executed.

+

+Filter is applied to the follwoing tree column name pattern.

+

+       PETTERN         EXAMPLE

+    1. Column        : author

+    2. Table.Column  : book.author

+    3. Table__Column : book__author

+    4. Table-Column  : book-author

+

+If column name is duplicate with other table,

+Main filter specified by C<table> option is used.

+

+You can set multiple filters at once.

+

+    $dbi->apply_filter(

+        'book',

+        [qw/issue_date write_date/] => {

+            out => 'tp_to_date',

+            in  => 'date_to_tp',

+            end => 'tp_to_displaydate'

+        }

+    );

+

 =head1 Parameter

 Parameter start at ':'. This is replaced to place holoder

@@ -420,17 +420,6 @@ and implements the following new ones.

 This is alias for C<fetch_hash_all>.

-=head2 C<end_filter>

-

-    $result = $result->end_filter(title  => 'to_something',

-                                     author => 'to_something');

-

-    $result = $result->end_filter([qw/title author/] => 'to_something');

-

-End filters.

-These each filters is executed after the filters applied by C<apply_filter> of

-L<DBIx::Custom> or C<filter> method.

-

 =head2 C<fetch>

     my $row = $result->fetch;

@@ -498,12 +487,6 @@ L<DBIx::Custom>.

 This is alias for C<fetch_hash_first>.

-=head2 C<remove_end_filter> DEPRECATED!

-

-    $result->remove_end_filter;

-

-Remove end filter.

-

 =head2 C<remove_filter>

     $result->remove_filter;

@@ -518,4 +501,21 @@ Remove filter. End filter is not removed.

 Stash is hash reference to save your data.

+=head2 C<remove_end_filter> DEPRECATED!

+

+    $result->remove_end_filter;

+

+Remove end filter.

+

+=head2 C<end_filter> DEPRECATED!

+

+    $result = $result->end_filter(title  => 'to_something',

+                                     author => 'to_something');

+

+    $result = $result->end_filter([qw/title author/] => 'to_something');

+

+End filters.

+These each filters is executed after the filters applied by C<apply_filter> of

+L<DBIx::Custom> or C<filter> method.

+

 =cut

@@ -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 }

@@ -2704,7 +2704,7 @@ $dbi->type_rule(

 );

 $dbi->insert({key1 => 2}, table => 'table1', type_rule_off => 1);

 $result = $dbi->select(table => 'table1', type_rule_off => 1);

-is($result->fetch->[0], 2);

+is($result->fetch->[0], 4);

 $dbi = DBIx::Custom->connect(dsn => 'dbi:SQLite:dbname=:memory:');

 $dbi->execute("create table table1 (key1 Date, key2 datetime)");