Update Pod-Parser to CPAN version 1.60

[perl5.git] / cpan / Pod-Checker / t / pod / podchkenc.t

diff --git a/cpan/Pod-Checker/t/pod/podchkenc.t b/cpan/Pod-Checker/t/pod/podchkenc.t
new file mode 100644 (file)
index 0000000..e7a5d7a
--- /dev/null
+++ b/cpan/Pod-Checker/t/pod/podchkenc.t
@@ -0,0 +1,29 @@
+#!/usr/bin/perl\r
+BEGIN {\r
+   use File::Basename;\r
+   my $THISDIR = dirname $0;\r
+   unshift @INC, $THISDIR;\r
+   require "testpchk.pl";\r
+   import TestPodChecker;\r
+}\r
+\r
+# this tests Pod::Checker accepts =encoding directive\r
+\r
+my %options = map { $_ => 1 } @ARGV;  ## convert cmdline to options-hash\r
+my $passed  = testpodchecker \%options, $0;\r
+exit( ($passed == 1) ? 0 : -1 )  unless $ENV{HARNESS_ACTIVE};\r
+\r
+__END__\r
+\r
+=encoding utf8\r
+\r
+=encode utf8\r
+\r
+dummy error\r
+\r
+=head1 An example.\r
+\r
+'Twas brillig, and the slithy toves did gyre and gimble in the wabe.\r
+\r
+=cut\r
+\r