From 998585898243fcead22928f903331412091936cb Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 25 Jul 2015 19:02:50 +0100
Subject: [PATCH 1/1] Test suite: Support t-dependencies (for gencontrol, not
 for tests/run-all)

---
 tests/lib        |  4 ++++
 tests/list-tests | 20 +++++++++++++++++++-
 2 files changed, 23 insertions(+), 1 deletion(-)

diff --git a/tests/lib b/tests/lib
index d131e7b2..ef2a8d56 100644
--- a/tests/lib
+++ b/tests/lib
@@ -602,6 +602,10 @@ t-restrict () {
 	(cd $root; t-restriction-$restriction >&2)
 }
 
+t-dependencies () {
+	: "Hopefully installed: $*"
+}
+
 t-chain-test () {
 	local ct=$1
 	local d=${0%/*}
diff --git a/tests/list-tests b/tests/list-tests
index 3381dbfa..8578fe60 100755
--- a/tests/list-tests
+++ b/tests/list-tests
@@ -23,6 +23,10 @@ restriction- () {
 	esac
 }
 
+dependencies- () {
+	:
+}
+
 test-done- () {
 	case "$whynots" in
 	'')	echo $t ;;
@@ -36,15 +40,26 @@ finish- () {
 
 test-begin-gencontrol () {
 	restrictions=''
+	dependencies=''
 }
 
 restriction-gencontrol () {
 	restrictions+=" $r"
 }
 
+dependencies-gencontrol () {
+	dependencies+=", $deps"
+}
+
 test-done-gencontrol () {
 	stanza=$(
-		sed <debian/tests/control.in ''
+		add_Depends="$dependencies" \
+		perl <debian/tests/control.in -wpe '
+			if (/^(\w+):/) {
+				my $h = $1;
+				s{$}{ $ENV{"add_$h"} // "" }e;
+			}
+		' 
 		case "$restrictions" in
 		?*) echo "Restrictions:$restrictions" ;;
 		esac
@@ -83,6 +98,9 @@ for t in $(run-parts --list tests/tests); do
 	for r in $(seddery 's/^t-restrict //p'); do
 		restriction-$mode
 	done
+	for deps in $(seddery 's/^t-dependencies //p'); do
+		dependencies-$mode
+	done
 	test-done-$mode
 done
 
-- 
2.30.2