From 3d81ccbf21dc5f81987365e6ff8c6e0ddc1f26e4 Mon Sep 17 00:00:00 2001
From: Oswald Buddenhagen <ossi@users.sf.net>
Date: Sun, 3 Nov 2013 20:17:54 +0100
Subject: [PATCH] make it possible to run only selected tests

---
 src/run-tests.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/run-tests.pl b/src/run-tests.pl
index 574378d..772b4ab 100755
--- a/src/run-tests.pl
+++ b/src/run-tests.pl
@@ -593,6 +593,7 @@ sub test($$$)
 {
 	my ($ttl, $sx, $tx) = @_;
 
+	return 0 if (scalar(@ARGV) && !grep { $_ eq $ttl } @ARGV);
 	print "Testing: ".$ttl." ...\n";
 	mkchan($$sx[0], $$sx[1], @{ $$sx[2] });
 	&writecfg(@{ $$tx[0] });