lintian: r194 - in branches/1.23.0: debian testset

[jeroen@wolffelaar.nl]

Author: jeroen
Date: 2004-04-18 21:54:38 +0200 (Sun, 18 Apr 2004)
New Revision: 194

Modified:
   branches/1.23.0/debian/rules
   branches/1.23.0/testset/runtests
Log:
More compact testing, you now need to explicitely run testset/runtests -v to
get those untested tags


Modified: branches/1.23.0/debian/rules
===================================================================
--- branches/1.23.0/debian/rules	2004-04-18 19:37:32 UTC (rev 193)
+++ branches/1.23.0/debian/rules	2004-04-18 19:54:38 UTC (rev 194)
@@ -10,7 +10,7 @@
 runtests: $(neededfiles)
 	@echo .... running tests ....
 	[ -d debian/tests ] || mkdir debian/tests
-	LINTIAN_ROOT="" /usr/bin/perl testset/runtests -v -k testset debian/tests $(onlyrun)
+	LINTIAN_ROOT="" /usr/bin/perl testset/runtests -k testset debian/tests $(onlyrun)
 	touch $@
 
 build: $(neededfiles)

Modified: branches/1.23.0/testset/runtests
===================================================================
--- branches/1.23.0/testset/runtests	2004-04-18 19:37:32 UTC (rev 193)
+++ branches/1.23.0/testset/runtests	2004-04-18 19:54:38 UTC (rev 194)
@@ -27,13 +27,17 @@
 The -k option means do not stop after one failed test, but try
 them all and report all errors.
 
-The -v option adds extra verbosity, for debugging purposes.
+The -v option will also display those tests that have a description, but are
+not tested in any testset-package.
 
 The optional 3rd parameter causes runtests to only run that particular test.
 END
     exit 2;
 }
 
+# for debugging:
+my $debug = 0;
+
 # Tests layout:
 # Every test package is in a directory pkgname-version in the testset
 # directory.  The lintian output that is expected for each package is
@@ -192,24 +196,24 @@
     my ($pkg, $ver) = ($pkgdir, $line);
     print "Running test on $pkg $ver: copying... ";
 
-    print "Cleaning up and repopulating $rundir/$pkgdir...\n" if $verbose;
+    print "Cleaning up and repopulating $rundir/$pkgdir...\n" if $debug;
     runsystem_ok("rm -rf $rundir/$pkgdir");
     runsystem("cp -rp $testset/$pkgdir $rundir");
     opendir D, "$testset" or die;
     foreach (readdir D) {
       next unless /^\Q${pkg}\E_.*\.orig\.tar\.gz$/;
-      print "Symlinking $_ in $rundir...\n" if $verbose;
+      print "Symlinking $_ in $rundir...\n" if $debug;
       symlink "../../$testset/$_", "$rundir/$_";
     }
     closedir D;
     runsystem("find $rundir -name CVS -o -name .svn -print0 | xargs -0r rm -R");
 
     print "building... ";
-    print "Running dpkg-buildpackage $dpkg_buildpackage_options in $rundir/$pkgdir...\n" if $verbose;
+    print "Running dpkg-buildpackage $dpkg_buildpackage_options in $rundir/$pkgdir...\n" if $debug;
     runsystem("cd $rundir/$pkgdir && dpkg-buildpackage $dpkg_buildpackage_options >../build.$pkg 2>&1");
 
     print "testing... ";
-    print "Running lintian $lintian_options on $rundir/$pkg\_$ver*.changes...\n" if $verbose;
+    print "Running lintian $lintian_options on $rundir/$pkg\_$ver*.changes...\n" if $debug;
     runsystem_ok("$lintian_path $lintian_options $rundir/$pkg\_$ver*.changes".
     	" 2>&1 | sort > $rundir/tags.$pkg");