#===============================================================================
#
# DESCRIPTION: test Z<>
#
# AUTHOR: Aliaksandr P. Zahatski, <zahatski@gmail.com>
#===============================================================================
package T::FormattingCode::Z;
use strict;
use warnings;
use Test::More;
use Data::Dumper;
use base 'TBase';
sub t01_as_xml : Test {
my $t = shift;
my $x = $t->parse_to_xhtml( <<T);
=para
The Z<TWEST>
T
is $x,q#<xhtml xmlns="http://www.w3.org/1999/xhtml"><p>The
</p></xhtml>#;
}
1;