From ddea233ddf3095cfa6892de0ffeabb4037d6d766 Mon Sep 17 00:00:00 2001 From: Marius Gavrilescu Date: Sun, 15 Feb 2015 00:25:01 +0200 Subject: [PATCH] Force using Archive::Tar when unpacking compressed tarballs on solaris --- lib/Zeal/Feed.pm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/lib/Zeal/Feed.pm b/lib/Zeal/Feed.pm index b4bbc52..ba1767f 100644 --- a/lib/Zeal/Feed.pm +++ b/lib/Zeal/Feed.pm @@ -62,6 +62,11 @@ sub _unpack_tar_to_dir { my $oldwd = getcwd; chdir $dir; my $tar = which 'tar' or which 'gtar'; + + # uncoverable branch true + # uncoverable condition false + local $ENV{ZEAL_USE_INTERNAL_TAR} = 1 if $file =~ /gz$|bz2$/ && $^O eq 'solaris'; + if ($tar && !$ENV{ZEAL_USE_INTERNAL_TAR}) { my $arg = '-xf'; $arg = '-xzf' if $file =~ /[.]t?gz$/; -- 2.39.2