diff options
Diffstat (limited to 'Packdrakeng.pm')
| -rw-r--r-- | Packdrakeng.pm | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/Packdrakeng.pm b/Packdrakeng.pm index adf62e9..f860557 100644 --- a/Packdrakeng.pm +++ b/Packdrakeng.pm @@ -138,13 +138,13 @@ sub choose_compression_method { $test_method =~ m/^gzip|^gunzip/ and do { $pack->{compress_method} ||= "gzip"; if (!$pack->{force_extern}) { - eval { require Packdrakeng::zlib; }; - if (! $@) { - $pack->{subcompress} = \&Packdrakeng::zlib::gzip_compress; - $pack->{subuncompress} = \&Packdrakeng::zlib::gzip_uncompress; - $pack->{use_extern} = 0; - $pack->{direct_write} = 1; - } + eval { + require Packdrakeng::zlib; + $pack->{subcompress} = \&Packdrakeng::zlib::gzip_compress; + $pack->{subuncompress} = \&Packdrakeng::zlib::gzip_uncompress; + $pack->{use_extern} = 0; + $pack->{direct_write} = 1; + }; } }; if (!$pack->{noargs}) { |