X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F14ora_common.t;h=25805e1db13f317bedf09dbc39d049b4ff3848f0;hb=b48f3f80f2201bb0921330b1a8d7800d11900e78;hp=c4c9f7a75fa5cc8256d1e8488fa10f99a7720bcb;hpb=bc319c6342efe2e20e77d6536a98d4534a206e5c;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/t/14ora_common.t b/t/14ora_common.t index c4c9f7a..25805e1 100644 --- a/t/14ora_common.t +++ b/t/14ora_common.t @@ -158,17 +158,15 @@ my $tester = dbixcsl_common_tests->new( } } - SKIP: { - skip 'not running comment tests', 1 unless (my $class = $classes->{oracle_loader_test1}); - my $filename = $schema->_loader->_get_dump_filename($class); - my $code = File::Slurp::slurp $filename; + my $class = $classes->{oracle_loader_test1}; + my $filename = $schema->_loader->get_dump_filename($class); + my $code = File::Slurp::slurp $filename; - like $code, qr/^=head1 NAME\n\n^$class - oracle_loader_test1 table comment\n\n^=cut\n/m, - 'table comment'; + like $code, qr/^=head1 NAME\n\n^$class - oracle_loader_test1 table comment\n\n^=cut\n/m, + 'table comment'; - like $code, qr/^=head2 value\n\n(.+:.+\n)+\noracle_loader_test1\.value column comment\n\n/m, - 'column comment and attrs'; - } + like $code, qr/^=head2 value\n\n(.+:.+\n)+\noracle_loader_test1\.value column comment\n\n/m, + 'column comment and attrs'; }, }, );