1 BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
2 use DBIx::Class::Optional::Dependencies -skip_all_without => qw( ic_dt cdbicompat );
10 use lib 't/cdbi/testlib';
15 use base 'DBIC::Test::SQLite';
17 Thing->columns(All => qw[thing_id this that date]);
20 my $thing = Thing->construct({ thing_id => 23, date => "01-02-1994" });
21 my $date = DateTime->now;
23 $thing->set( date => $date );
24 $thing->set( date => $date );
27 $thing->discard_changes;