X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FCompress%2FZlib%2Ft%2F10defhdr.t;h=55e9ceaee8934e293d1b50ba58c0882a4bc1f1ab;hb=e8e0953481a8eb69731d048ec19e15bbd537fd73;hp=f12b0d578df8dc0459a9d86adc4152e8aa7544ad;hpb=9f2e35140733c7b8f4ab179f11bf740ca3d2130e;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/ext/Compress/Zlib/t/10defhdr.t b/ext/Compress/Zlib/t/10defhdr.t
index f12b0d5..55e9cea 100644
--- a/ext/Compress/Zlib/t/10defhdr.t
+++ b/ext/Compress/Zlib/t/10defhdr.t
@@ -1,7 +1,7 @@
 BEGIN {
     if ($ENV{PERL_CORE}) {
 	chdir 't' if -d 't';
-	@INC = ("../lib", "lib");
+	@INC = ("../lib", "lib/compress");
     }
 }
 
@@ -325,7 +325,7 @@ EOM
         like $IO::Uncompress::Inflate::InflateError,'/Trailer Error: CRC mismatch/',
             "Trailer Error: CRC mismatch";
         ok $gunz->eof() ;
-        ok ! ${ $gunz->trailingData() } ;
+        ok ! $gunz->trailingData() ;
         ok $uncomp eq $string;
         ok $gunz->close ;
     }
@@ -341,7 +341,7 @@ EOM
         my $uncomp ;
         ok $gunz->read($uncomp) >= 0  ;
         ok $gunz->eof() ;
-        ok ! ${ $gunz->trailingData() } ;
+        ok ! $gunz->trailingData() ;
         ok $uncomp eq $string;
         ok $gunz->close ;
     }