From e5ae4bbcf70dd5d642bbe85e88585c110e523670 Mon Sep 17 00:00:00 2001 From: joey Date: Wed, 3 May 2006 20:06:31 +0000 Subject: [PATCH] add a syntax check --- t/syntax.t | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100755 t/syntax.t diff --git a/t/syntax.t b/t/syntax.t new file mode 100755 index 000000000..1e6b04747 --- /dev/null +++ b/t/syntax.t @@ -0,0 +1,19 @@ +#!/usr/bin/perl +use warnings; +use strict; +use Test; + +my @progs="ikiwiki"; +my @libs="IkiWiki.pm"; +push @libs, map { chomp; $_ } `find IkiWiki -type f -name \\*.pm`; + +plan(tests => (@progs + @libs)); + +foreach my $file (@progs) { + print "# Testing $file\n"; + ok(system("perl -T -c $file >/dev/null 2>&1"), 0); +} +foreach my $file (@libs) { + print "# Testing $file\n"; + ok(system("perl -c $file >/dev/null 2>&1"), 0); +} -- 2.26.2