print "\n";
}
-
sub get_cd_by_track {
my $tracktitle = shift;
print "get_cd_by_track($tracktitle):\n";
print "\n";
}
-
-
sub get_artist_by_track {
my $tracktitle = shift;
print "get_artist_by_track($tracktitle):\n";
print $artist->name . "\n\n";
}
-
sub get_artist_by_cd {
my $cdtitle = shift;
print "get_artist_by_cd($cdtitle):\n";
}
Test::EOL::all_perl_files_ok({ trailing_whitespace => 1 },
- qw/t xt lib script/,
+ qw/t xt lib script examples/,
DBICTest::RunMode->is_author ? ('maint') : (),
);
+# Changes is not a "perl file", hence checked separately
+Test::EOL::eol_unix_ok('Changes', { trailing_whitespace => 1 });
+
# FIXME - Test::EOL declares 'no_plan' which conflicts with done_testing
# https://github.com/schwern/test-more/issues/14
#done_testing;
}
Test::NoTabs::all_perl_files_ok(
- qw/t xt lib script/,
+ qw/t xt lib script examples/,
DBICTest::RunMode->is_author ? ('maint') : (),
);
+# Changes is not a "perl file", hence checked separately
+Test::NoTabs::notabs_ok('Changes');
+
# FIXME - Test::NoTabs declares 'no_plan' which conflicts with done_testing
# https://github.com/schwern/test-more/issues/14
#done_testing;