sub text {
        my($origtext, $is_cdata) = @_;

        if ( $origtext =~ /^\s*$/ ) { return; }
        $origtext = "UNDEF" if !defined $origtext;
        $is_cdata = "UNDEF" if !defined $is_cdata;
        $origtext =~ s/ \& / \& /g;
        $origtext =~ s/½/\½/g;
        print $origtext;
}