sub t02_as_xhtml : Test { my $t = shift; my $x = $t->parse_to_xhtml( <<T); =para test, and word|synonym1;synonym2 T $t->is_deeply_xml( $x, q#<?xml version="1.0"?> <xhtml xmlns="http://www.w3.org/1999/xhtml"> <p><dfn>test</dfn>, and <dfn>word</dfn></p> </xhtml> # ); }

sub t03_as_docbook : Test { # Looks like you failed 1 test of 3. my $t = shift; my $x = $t->parse_to_docbook( <<T); =para test, and word|synonym1;synonym2 T $t->is_deeply_xml( $x, q#<chapter><para>test, and word </para></chapter> # ); }

1;