t/run/29inflate_datetime.tl

   1 sub run_tests {
   2 my $schema = shift;
   3
   4 eval { require DateTime::Format::MySQL };
   5 plan skip_all => "Need DateTime::Format::MySQL for inflation tests" if $@;
   6
   7 plan tests => 2;
   8
   9 # inflation test
  10 my $event = $schema->resultset("Event")->find(1);
  11
  12 isa_ok($event->starts_at, 'DateTime', 'DateTime returned');
  13
  14 is($event->starts_at, '2006-04-25T22:24:33', 'Correct date/time');
  15
  16 }
  17
  18 1;