From 14f1aac18e99342a7474b73f93f01906cb6f0931 Mon Sep 17 00:00:00 2001
From: des <des@d4fa192b-c00b-0410-8231-f00ffab90ce4>
Date: Mon, 20 Aug 2007 09:42:01 +0000
Subject: [PATCH] If the first and only argument is 'list', list all available
 test cases.

git-svn-id: svn+ssh://projects.linpro.no/svn/varnish/trunk@1876 d4fa192b-c00b-0410-8231-f00ffab90ce4
---
 varnish-tools/regress/varnish-regress.pl | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/varnish-tools/regress/varnish-regress.pl b/varnish-tools/regress/varnish-regress.pl
index 5a27cfdb..3d2105b6 100755
--- a/varnish-tools/regress/varnish-regress.pl
+++ b/varnish-tools/regress/varnish-regress.pl
@@ -62,9 +62,15 @@ MAIN:{
 	or usage();
 
     my $controller = new Varnish::Test;
+    my @all_cases = $controller->cases();
+
+    if (@ARGV == 1 && $ARGV[0] eq 'list') {
+	print join(' ', @all_cases), "\n";
+	exit 0;
+    }
 
     if (!@ARGV) {
-	@ARGV = $controller->cases();
+	@ARGV = @all_cases;
     } else {
 	map { s/^(\d+)$/sprintf('Ticket%03d', $1)/e } @ARGV;
     }
-- 
2.39.5