@@ -1,2 +1,5 @@

+0.0201

+  rename tranzaction to transaction

+  add filter_off

 0.0101

   First release

@@ -392,25 +392,25 @@ sub _build_bind_values {

     return \@bind_values;

 }

-# Run tranzaction

-sub run_tranzaction {

-    my ($self, $tranzaction) = @_;

+# Run transaction

+sub run_transaction {

+    my ($self, $transaction) = @_;

     # Check auto commit

-    croak("AutoCommit must be true before tranzaction start")

+    croak("AutoCommit must be true before transaction start")

       unless $self->_auto_commit;

     # Auto commit off

     $self->_auto_commit(0);

-    # Run tranzaction

-    eval {$tranzaction->()};

+    # Run transaction

+    eval {$transaction->()};

     # Tranzaction error

-    my $tranzaction_error = $@;

+    my $transaction_error = $@;

     # Tranzaction is failed.

-    if ($tranzaction_error) {

+    if ($transaction_error) {

         # Rollback

         eval{$self->dbh->rollback};

@@ -422,11 +422,11 @@ sub run_tranzaction {

         if ($rollback_error) {

             # Rollback is failed

-            croak("${tranzaction_error}Rollback is failed : $rollback_error");

+            croak("${transaction_error}Rollback is failed : $rollback_error");

         }

         else {

             # Rollback is success

-            croak("${tranzaction_error}Rollback is success");

+            croak("${transaction_error}Rollback is success");

         }

     }

     # Tranzaction is success

@@ -717,6 +717,17 @@ sub _add_query_cache {

     return $class;

 }

+# Both bind_filter and fetch_filter off

+sub filter_off {

+    my $self = shift;

+    

+    # filter off

+    $self->bind_filter(undef);

+    $self->fetch_filter(undef);

+    

+    return $self;

+}

+

 Object::Simple->build_class;

 =head1 NAME

@@ -905,6 +916,16 @@ If database is already disconnected, this method do noting.

     # Check connected

     $dbi->connected

+    

+=head2 filter_off

+

+    # bind_filter and fitch_filter off

+    $self->filter_off;

+    

+This is equeal to

+    

+    $self->bind_filter(undef);

+    $self->fetch_filter(undef);

 =head2 add_filter

@@ -978,14 +999,14 @@ add_filter add filter to filters

 See also L<DBIx::Custom::SQL::Template>

-=head2 run_tranzaction

+=head2 run_transaction

-    # Run tranzaction

-    $dbi->run_tranzaction(sub {

+    # Run transaction

+    $dbi->run_transaction(sub {

         # do something

     });

-If tranzaction is success, commit is execute. 

+If transaction is success, commit is execute. 

 If tranzation is died, rollback is execute.

 =head2 insert

@@ -1086,7 +1107,7 @@ You must not change these mode not to damage your data.

 If you change these mode, 

 you cannot get correct error message, 

-or run_tranzaction may fail.

+or run_transaction may fail.

 =head1 AUTHOR

@@ -211,3 +211,10 @@ $dbi = DBIx::Custom->new;

 $dbi->add_format(a => sub {1});

 is($dbi->formats->{a}->(), 1, $test);

+test 'filter_off';

+$dbi = DBIx::Custom->new;

+$dbi->bind_filter('a');

+$dbi->fetch_filter('b');

+$dbi->filter_off;

+ok(!$dbi->bind_filter,  "$test : bind_filter  off");

+ok(!$dbi->fetch_filter, "$test : fetch_filter off");

@@ -406,7 +406,7 @@ is_deeply($rows, [{key1 => 6, key2 => 6, key3 => 6, key4 => 6, key5 => 5},

 test 'run_tansaction';

 $dbi->do($DROP_TABLE->{0});

 $dbi->do($CREATE_TABLE->{0});

-$dbi->run_tranzaction(sub {

+$dbi->run_transaction(sub {

     $insert_tmpl = 'insert into table1 {insert key1 key2}';

     $dbi->execute($insert_tmpl, {key1 => 1, key2 => 2});

     $dbi->execute($insert_tmpl, {key1 => 3, key2 => 4});

@@ -419,7 +419,7 @@ $dbi->do($DROP_TABLE->{0});

 $dbi->do($CREATE_TABLE->{0});

 $dbi->dbh->{RaiseError} = 0;

 eval{

-    $dbi->run_tranzaction(sub {

+    $dbi->run_transaction(sub {

         $insert_tmpl = 'insert into table1 {insert key1 key2}';

         $dbi->execute($insert_tmpl, {key1 => 1, key2 => 2});

         die "Fatal Error";

@@ -435,7 +435,7 @@ is_deeply($rows, [], "$test : rollback");

 test 'Error case';

 $dbi = DBIx::Custom->new;

-eval{$dbi->run_tranzaction};

+eval{$dbi->run_transaction};

 like($@, qr/Not yet connect to database/, "$test : Yet Connected");

 $dbi = DBIx::Custom->new(data_source => 'dbi:SQLit');

@@ -445,9 +445,9 @@ ok($@, "$test : connect error");

 $dbi = DBIx::Custom->new($NEW_ARGS->{0});

 $dbi->connect;

 $dbi->dbh->{AutoCommit} = 0;

-eval{$dbi->run_tranzaction()};

-like($@, qr/AutoCommit must be true before tranzaction start/,

-         "$test : run_tranzaction auto commit is false");

+eval{$dbi->run_transaction()};

+like($@, qr/AutoCommit must be true before transaction start/,

+         "$test : run_transaction auto commit is false");

 $dbi = DBIx::Custom->new($NEW_ARGS->{0});

 $sql = 'laksjdf';