# -*- mode: Perl -*- package LaTeXML::Package::Pool; use strict; use warnings; use LaTeXML::Package; #====================================================================== # Namespace tests ns1.tex, ns2.tex, ns3.tex... # The TeX sources are identical #====================================================================== # Case 4: The DTD uses the two prefixes "inner" and "outer" # The XML output should use the same prefixes. # The code will use the prefix similar but different namespace prefixes #====================================================================== RegisterNamespace(incode => "http://inner.com/"); RegisterNamespace(outcode => "http://outer.com/"); DocType("outcode:song", "-//NIST LaTeXML//LaTeXML Poem", 'ns4.dtd'); Tag('outcode:song', autoOpen => 1, autoClose => 1); Tag('outcode:verse', autoOpen => 1, autoClose => 1); Tag('incode:line', autoOpen => 1, autoClose => 1); DefConstructor('\bigskip', ""); DefConstructor('\par', sub { $_[0]->maybeCloseElement('incode:line'); }); #********************************************************************** 1;