X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FZeal%2FFeed.pm;h=6c1ebc2416b08defc71d2eb1f9ba559d6d1996d8;hb=refs%2Ftags%2F0.001001;hp=b4bbc521437d6649a1e36e28b8f4ccebc7eb07dd;hpb=a95f0a1f84e33faaee307241ecbc9f1b82e7e066;p=zeal.git diff --git a/lib/Zeal/Feed.pm b/lib/Zeal/Feed.pm index b4bbc52..6c1ebc2 100644 --- a/lib/Zeal/Feed.pm +++ b/lib/Zeal/Feed.pm @@ -5,7 +5,7 @@ use strict; use warnings; use re '/s'; -our $VERSION = '0.001'; +our $VERSION = '0.001001'; use parent qw/Class::Accessor::Fast/; __PACKAGE__->mk_ro_accessors(qw/version/); @@ -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$/;