This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
lib/h2ph.t to test generated t/_h2ph_pre.ph instead of the system one
[perl5.git] / lib / h2ph.t
index 2b58f6a..64d9dc0 100644 (file)
@@ -48,7 +48,7 @@ $result = runperl( progfile => '_h2ph_pre.ph',
                    stderr => 1 );
 like( $result, qr/syntax OK$/, "preamble compiles");
 
-$result = runperl( switches => ["-w"],
+$result = runperl( switches => ['-I.', "-w"],
                    stderr => 1,
                    prog => <<'PROG' );
 $SIG{__WARN__} = sub { die $_[0] }; require q(lib/h2ph.pht);