1N/ABEGIN {
1N/A use File::Basename;
1N/A my $THISDIR = dirname $0;
1N/A unshift @INC, $THISDIR;
1N/A require "testp2pt.pl";
1N/A import TestPodIncPlainText;
1N/A}
1N/A
1N/Amy %options = map { $_ => 1 } @ARGV; ## convert cmdline to options-hash
1N/Amy $passed = testpodplaintext \%options, $0;
1N/Aexit( ($passed == 1) ? 0 : -1 ) unless $ENV{HARNESS_ACTIVE};
1N/A
1N/A
1N/A__END__
1N/A
1N/A
1N/A=head1 Test nested item lists
1N/A
1N/AThis is a test to ensure the nested =item paragraphs
1N/Aget indented appropriately.
1N/A
1N/A=over 2
1N/A
1N/A=item 1
1N/A
1N/AFirst section.
1N/A
1N/A=over 2
1N/A
1N/A=item a
1N/A
1N/Athis is item a
1N/A
1N/A=item b
1N/A
1N/Athis is item b
1N/A
1N/A=back
1N/A
1N/A=item 2
1N/A
1N/ASecond section.
1N/A
1N/A=over 2
1N/A
1N/A=item a
1N/A
1N/Athis is item a
1N/A
1N/A=item b
1N/A
1N/Athis is item b
1N/A
1N/A=item c
1N/A
1N/A=item d
1N/A
1N/AThis is item c & d.
1N/A
1N/A=back
1N/A
1N/A=back
1N/A
1N/A=cut