summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
Diffstat (limited to 't')
-rwxr-xr-xt/size10
1 files changed, 6 insertions, 4 deletions
diff --git a/t/size b/t/size
index ce613f8e..f661db64 100755
--- a/t/size
+++ b/t/size
@@ -3,13 +3,15 @@
# Debhelper is supposed to consist of small, simple, easy to understand
# programs. Programs growing in size and complexity without bounds is a
# bug.
-use Test;
+use Test::More;
-my @progs=grep { -x $_ } glob("dh_*");
+# exclude dh_python since it's deprecated
+my @progs=grep { -x $_ && !/dh_python/ } glob("dh_*");
plan(tests => (@progs + @progs));
foreach my $file (@progs) {
+
my $lines=0;
my $maxlength=0;
open(IN, $file) || die "open: $!";
@@ -23,6 +25,6 @@ foreach my $file (@progs) {
}
close IN;
print "# $file has $lines lines, max length is $maxlength\n";
- ok($lines < 150);
- ok($maxlength < 160);
+ ok($lines < 150, $file);
+ ok($maxlength < 160, $file);
}