Bug 349198: 001compile.t must not compile mod_perl.pl - Patch by Frédéric Buclin...

diff --git a/t/001compile.t b/t/001compile.t
index ebfc4a5d8620199eb91e2dd34ebb222f2da42c08..7d0bc0181dbe7f731183b9e4323028409897f1fe 100644 (file)
--- a/t/001compile.t
+++ b/t/001compile.t
@@ -65,6 +65,12 @@ foreach my $file (@testitems) {
     $file =~ s/\s.*$//; # nuke everything after the first space (#comment)
     next if (!$file); # skip null entries
 
+    # Skip mod_perl.pl in all cases. It doesn't compile correctly from the command line.
+    if ($file eq 'mod_perl.pl') {
+        ok(1, "Skipping mod_perl.pl");
+        next;
+    }
+
     # Check that we have a DBI module to support the DB, if this is a database
     # module (but not Schema)
     if ($file =~ m#Bugzilla/DB/([^/]+)\.pm$# && $file ne "Bugzilla/DB/Schema.pm") {