xref: /onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/pod/multiline_items.t (revision 0:68f95e015346)
1*0Sstevel@tonic-gateBEGIN {
2*0Sstevel@tonic-gate   use File::Basename;
3*0Sstevel@tonic-gate   my $THISDIR = dirname $0;
4*0Sstevel@tonic-gate   unshift @INC, $THISDIR;
5*0Sstevel@tonic-gate   require "testp2pt.pl";
6*0Sstevel@tonic-gate   import TestPodIncPlainText;
7*0Sstevel@tonic-gate}
8*0Sstevel@tonic-gate
9*0Sstevel@tonic-gatemy %options = map { $_ => 1 } @ARGV;  ## convert cmdline to options-hash
10*0Sstevel@tonic-gatemy $passed  = testpodplaintext \%options, $0;
11*0Sstevel@tonic-gateexit( ($passed == 1) ? 0 : -1 )  unless $ENV{HARNESS_ACTIVE};
12*0Sstevel@tonic-gate
13*0Sstevel@tonic-gate
14*0Sstevel@tonic-gate__END__
15*0Sstevel@tonic-gate
16*0Sstevel@tonic-gate
17*0Sstevel@tonic-gate=head1 Test multiline item lists
18*0Sstevel@tonic-gate
19*0Sstevel@tonic-gateThis is a test to ensure that multiline =item paragraphs
20*0Sstevel@tonic-gateget indented appropriately.
21*0Sstevel@tonic-gate
22*0Sstevel@tonic-gate=over 4
23*0Sstevel@tonic-gate
24*0Sstevel@tonic-gate=item This
25*0Sstevel@tonic-gateis
26*0Sstevel@tonic-gatea
27*0Sstevel@tonic-gatetest.
28*0Sstevel@tonic-gate
29*0Sstevel@tonic-gate=back
30*0Sstevel@tonic-gate
31*0Sstevel@tonic-gate=cut
32