6 eval "use DBIx::Class::CDBICompat; use Time::Piece::MySQL;";
8 plan (skip_all => "Time::Piece::MySQL, Class::Trigger and DBIx::ContextualFetch required: $@");
11 plan skip_all => 'Set $ENV{DBICTEST_MYSQL_DSN}, _USER and _PASS to run this test'
12 unless ($ENV{DBICTEST_MYSQL_DSN} && $ENV{DBICTEST_MYSQL_USER});
16 use lib 't/cdbi/testlib';
21 my $log = Log->insert( { message => 'initial message' } );
22 ok eval { $log->datetime_stamp }, "Have datetime";
25 $log->message( 'a revised message' );
27 ok eval { $log->datetime_stamp }, "Have datetime after update";