sub t03_as_docbook : Test { my $t = shift; my $x = $t->parse_to_docbook( <<T); =para Italic test T $t->is_deeply_xml( $x, q#<chapter><para>Italic <emphasis role='italic'>test</emphasis> </para></chapter># ); }

sub t03_as_latex : Test { my $t = shift; my $x = $t->parse_to_latex( <<T); =para Italic test T ok $x =~ m%\\emph\{test\}%; }

1;