test suite: t-archive: Honour t_archive_ln_s

This will let us arrange to use cp instead.

No functional change for existing callers.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/tests/lib b/tests/lib
index 8392e79a5cfe779e61f3aa6b96c4772c06773570..c03f34a721c6a92c1873e18f33e4d1bcdb6d7ba3 100644 (file)
--- a/tests/lib
+++ b/tests/lib
@@ -362,7 +362,8 @@ t-archive () {
        v=$2
        local dscf=${p}_$2.dsc
        rm -f $tmp/mirror/pool/main/${p}_*
-       ln -s $troot/pkg-srcs/${p}_${2%-*}* $tmp/mirror/pool/main/
+       ${t_archive_ln_s-ln -s} \
+                $troot/pkg-srcs/${p}_${2%-*}* $tmp/mirror/pool/main/
        t-archive-query $suite
        rm -rf $tmp/extract
        mkdir $tmp/extract