X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/blobdiff_plain/e5ae4bbcf70dd5d642bbe85e88585c110e523670..0065bef1c1c7806b5bd7dc656961b58d33553460:/t/syntax.t diff --git a/t/syntax.t b/t/syntax.t index 1e6b04747..7e0cfbd2d 100755 --- a/t/syntax.t +++ b/t/syntax.t @@ -1,19 +1,18 @@ #!/usr/bin/perl use warnings; use strict; -use Test; +use Test::More; -my @progs="ikiwiki"; +my @progs="ikiwiki.in"; my @libs="IkiWiki.pm"; -push @libs, map { chomp; $_ } `find IkiWiki -type f -name \\*.pm`; +# monotone and external skipped since they need a perl modules +push @libs, map { chomp; $_ } `find IkiWiki -type f -name \\*.pm | grep -v IkiWiki/Rcs/monotone.pm | grep -v IkiWiki/Plugin/external.pm`; plan(tests => (@progs + @libs)); foreach my $file (@progs) { - print "# Testing $file\n"; - ok(system("perl -T -c $file >/dev/null 2>&1"), 0); + ok(system("perl -T -c $file >/dev/null 2>&1") eq 0, $file); } foreach my $file (@libs) { - print "# Testing $file\n"; - ok(system("perl -c $file >/dev/null 2>&1"), 0); + ok(system("perl -c $file >/dev/null 2>&1") eq 0, $file); }