Test suite: unset empty redacted paths

Some programs might treat that as a path of implicitly ".".

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

diff --git a/tests/tstunt/dpkg-parsechangelog b/tests/tstunt/dpkg-parsechangelog
index 4d7cdf84fb3ad426e31ab755dfc3e5e69d3fe682..436591f696cbda58777ef421bfe8aa4c429eae75 100755 (executable)
--- a/tests/tstunt/dpkg-parsechangelog
+++ b/tests/tstunt/dpkg-parsechangelog
@@ -32,6 +32,7 @@ if (@ARGV) {
        my @npath = grep { $_ ne $strip } @opath;
        @npath != @opath  or die "$0 $k ".($ENV{$k}//"(undef)")." ?";
        $ENV{$k} = join ':', @npath;
+       delete $ENV{$k} if !@npath;
     }
     die if $ENV{'DGIT_NO_TSTUNT_CLPARSE'}++;
     exec 'dpkg-parsechangelog', @orgargv;