Fix Archive-Tar's 02_methods.t when IO::Compress::Bzip2 is absent
Steve Hay [Wed, 1 Oct 2008 16:55:42 +0000 (16:55 +0000)]
p4raw-id: //depot/perl@34453

lib/Archive/Tar/t/02_methods.t

index 636760f..7354e6c 100644 (file)
@@ -73,7 +73,8 @@ if ($TOO_LONG) {
 
 my @ROOT        = grep { length }   'src', $TOO_LONG ? 'short' : 'long';
 
-my $ZLIB        = eval { require IO::Zlib; 1 } ? 1 : 0;
+my $ZLIB        = eval { require IO::Zlib;
+                         require IO::Compress::Bzip2; 1 } ? 1 : 0;
 my $BZIP        = eval { require IO::Uncompress::Bunzip2;
                          require IO::Compress::Bzip2; 1 } ? 1 : 0;