X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FFixtures.pm;h=65806ed1fcf1ac8f9d40c3e8c30d9a504b638622;hb=87890302bbd02a3992e919df3a43054d4b113cef;hp=5c5dc04b9dd2c80b16fa0c14510c7b1dec9a93d6;hpb=3d4debec185c87acba106e27e0b4ab6ded4bc041;p=dbsrgits%2FDBIx-Class-Fixtures.git diff --git a/lib/DBIx/Class/Fixtures.pm b/lib/DBIx/Class/Fixtures.pm index 5c5dc04..65806ed 100644 --- a/lib/DBIx/Class/Fixtures.pm +++ b/lib/DBIx/Class/Fixtures.pm @@ -867,8 +867,8 @@ sub dump_object { # mess with dates if specified if ($set->{datetime_relative}) { - my $formatter= $object->result_source->schema->storage->datetime_parser; - unless ($@ || !$formatter) { + my $formatter= eval {$object->result_source->schema->storage->datetime_parser}; + unless (!$formatter) { my $dt; if ($set->{datetime_relative} eq 'today') { $dt = DateTime->today;