runtests.pl now lets you specify a test number on the command line if you only want...

diff --git a/runtests.pl b/runtests.pl
index 930ff116d502757ba244003bbaee87e317aea9fa..376a4a1e4717cd5bf222ef6bd45e9f7e064b2207 100755 (executable)
--- a/runtests.pl
+++ b/runtests.pl
@@ -27,13 +27,16 @@ use strict;
 use Test::Harness qw(&runtests $verbose);
 
 $verbose = 0;
+my $onlytest = "";
 
 foreach (@ARGV) {
     if (/^(?:-v|--verbose)$/) {
         $verbose = 1;
-        last;
+    }
+    else {
+        $onlytest = $_;
     }
 }
 
-runtests(glob("t/*.t"));
+runtests(glob("t/$onlytest*.t"));