my @npath = grep { $_ ne $strip } @opath;
@npath != @opath or die "$0 $k ".($ENV{$k}//"(undef)")." ?";
$ENV{$k} = join ':', @npath;
my @npath = grep { $_ ne $strip } @opath;
@npath != @opath or die "$0 $k ".($ENV{$k}//"(undef)")." ?";
$ENV{$k} = join ':', @npath;
}
die if $ENV{'DGIT_NO_TSTUNT_CLPARSE'}++;
exec 'dpkg-parsechangelog', @orgargv;
}
die if $ENV{'DGIT_NO_TSTUNT_CLPARSE'}++;
exec 'dpkg-parsechangelog', @orgargv;