1BEGIN { 2 use File::Basename; 3 my $THISDIR = dirname $0; 4 unshift @INC, $THISDIR; 5 require "testp2pt.pl"; 6 import TestPodIncPlainText; 7} 8 9my %options = map { $_ => 1 } @ARGV; ## convert cmdline to options-hash 10my $passed = testpodplaintext \%options, $0; 11exit( ($passed == 1) ? 0 : -1 ) unless $ENV{HARNESS_ACTIVE}; 12 13 14__END__ 15 16 17=head1 Test nested item lists 18 19This is a test to ensure the nested =item paragraphs 20get indented appropriately. 21 22=over 2 23 24=item 1 25 26First section. 27 28=over 2 29 30=item a 31 32this is item a 33 34=item b 35 36this is item b 37 38=back 39 40=item 2 41 42Second section. 43 44=over 2 45 46=item a 47 48this is item a 49 50=item b 51 52this is item b 53 54=item c 55 56=item d 57 58This is item c & d. 59 60=back 61 62=back 63 64=cut 65