Silence t/pod/*.t about alternate quote-mappings now implemented
authorJarkko Hietaniemi <jhi@iki.fi>
Sun, 10 Sep 2000 23:37:09 +0000 (23:37 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Sun, 10 Sep 2000 23:37:09 +0000 (23:37 +0000)
by Pod::Text, from Brad Appleton.

p4raw-id: //depot/perl@7048

t/pod/testp2pt.pl

index 2ff8aa4..91a20ee 100644 (file)
@@ -106,7 +106,7 @@ sub begin_input {
 sub podinc2plaintext( $ $ ) {
     my ($infile, $outfile) = @_;
     local $_;
-    my $text_parser = $MYPKG->new;
+    my $text_parser = $MYPKG->new(quotes => "`'");
     $text_parser->parse_from_file($infile, $outfile);
 }