From 7fc714261baac8630925cd57ab5408ea33a444c4 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 30 May 2015 13:27:45 +0100
Subject: Test suite: Provide new t-stunt facility

---
 tests/lib | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

(limited to 'tests')

diff --git a/tests/lib b/tests/lib
index 357bb86..1a9b042 100644
--- a/tests/lib
+++ b/tests/lib
@@ -323,6 +323,20 @@ t-822-field () {
 	' <$file
 }
 
+t-tstunt () {
+	local tstunt=$tmp/tstunt
+	mkdir -p $tstunt
+	case "$PATH" in
+	"$tstunt:"*)	;;
+	*":$tstunt:"*)	;;
+	*)		PATH="$tstunt:$PATH" ;;
+	esac
+	local f
+	for f in "$@"; do
+		ln -sf "$troot/tstunt/$f" "$tstunt"/.
+	done
+}
+
 t-ref-dsc-dgit () {
 	local dsc=${p}_${v}.dsc
 	local val=`t-822-field $tmp/incoming/$dsc Dgit`
-- 
cgit v1.2.3