lib/Pod/t/Usage.t no indirects

Perl · Jul 1, 2020 · 5092f21 · 5092f21
1 parent 88ffcb7
commit 5092f21
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Pod/t/Usage.t b/lib/Pod/t/Usage.t
@@ -89,7 +89,7 @@ is( $$fake_out, $vbl_1, 'Verbose level 1' );
 $$fake_out = '';
 require Pod::Text; # Pod::Usage->isa( 'Pod::Text' )
 
-( my $p2tp = new Pod::Text )->parse_from_file( $0, \*FAKEOUT );
+( my $p2tp = Pod::Text->new() )->parse_from_file( $0, \*FAKEOUT );
 my $pod2text = $$fake_out;
 
 $$fake_out = '';