chiark / gitweb /
Test suite: tstunt/dpkg-parsechangelog: Do not complain if PERLLIB is empty.
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 15 Oct 2016 18:58:40 +0000 (19:58 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 15 Oct 2016 18:58:43 +0000 (19:58 +0100)
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
debian/changelog
tests/tstunt/dpkg-parsechangelog

index 34502bf..65ecda4 100644 (file)
@@ -271,7 +271,8 @@ dgit (1.1) unstable; urgency=medium
     currently only be updated with an actual upload, ie dgit push.)
   * Make warnings fatal in dpkg-repos-admin-debian, dgit-ssh-dispatch
     (using setup_sigwarn).
-  * Make warnings fatal in tstunt/dpkg-parsechangelog (directly).
+  * tstunt/dpkg-parsechangelog: Make warnings fatal (directly).
+  * tstunt/dpkg-parsechangelog: Do not complain if PERLLIB is empty.
   * Test suite: Honour DGIT_TEST_DEBUG=''.
   * With -DDDD, print out all gitcfg references (copious!)
   * Fix a debug message in the obsolete sshpsql archive access driver.
index ce2d66d..1abd00c 100755 (executable)
@@ -28,7 +28,7 @@ if (@ARGV) {
     my $strip = $0;
     $strip =~ s#/[^/]+$## or die "$0 ?";
     foreach my $k (qw(PATH PERLLIB)) {
-       my @opath = split /\:/, $ENV{$k};
+       my @opath = defined $ENV{$k} ? split /\:/, $ENV{$k} : ();
        my @npath = grep { $_ ne $strip } @opath;
        @npath != @opath  or die "$0 $k $ENV{$k} ?";
        $ENV{$k} = join ':', @npath;