diff --git a/t/syntaxCheck.t b/t/syntaxCheck.t index 2e97a8b85..b71a63aad 100644 --- a/t/syntaxCheck.t +++ b/t/syntaxCheck.t @@ -20,6 +20,7 @@ use Test::More; plan skip_all => 'set TEST_SYNTAX to enable this test' unless $ENV{TEST_SYNTAX}; my @modules; +my @failed_packages; my $wgLib = WebGUI::Test->lib; diag("Checking modules in $wgLib"); File::Find::find( \&getWebGUIModules, $wgLib); @@ -33,6 +34,15 @@ diag("Planning on $numTests tests"); foreach my $package (@modules) { my $returnVal = system("$^X -I$wgLib -wc $package"); is($returnVal, 0, "syntax check for $package"); + push(@failed_packages, $package) if ($returnVal != 0); +} + +if (@failed_packages) { + print "\n# Compilation FAILED for the following packages:\n"; + foreach my $package (@failed_packages) { + print "# - $package\n"; + } + print "\n" } #----------------------------------------