From: zach%zachlipton.com <>
Date: Tue, 4 Sep 2001 05:04:09 +0000 (+0000)
Subject: add tests for use strict;
X-Git-Tag: bugzilla-2.14.1~153
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=93ec66548fc0cdec1c2b65f92add69884e9ec9cd;p=thirdparty%2Fbugzilla.git

add tests for use strict;
---

diff --git a/t/2goodperl.t b/t/2goodperl.t
index da1060f5db..fa6d9a8dc3 100644
--- a/t/2goodperl.t
+++ b/t/2goodperl.t
@@ -35,7 +35,7 @@
 #Bugzilla Test 2#
 ####GoodPerl#####
 
-BEGIN { use Test::More tests => 51; }
+BEGIN { use Test::More tests => 102; }
 BEGIN { use lib 't/'; }
 BEGIN { use Support::Files; }
 
@@ -57,6 +57,11 @@ foreach $file (@testitems) {
 			next;
 		}
 	}
+	if ($filecontent !~ /use strict;/) {
+		ok(0,"$file DOES NOT use strict");
+	} else {
+		ok(1,"$files uses strict");
+	}
 }