########################################################################
# SGMLSPL script produced automatically by the script sgmlspl.pl
#
# Document Type: invitation --> customization for LaTeX
# Edited by: mg (August 14th 1998)
########################################################################
use SGMLS; # Use the SGMLS package.
use SGMLS::Output; # Use stack-based output.
#
# Document Handlers.
#
sgml('start', sub {});
sgml('end', sub {});
#
# Element Handlers.
#
# Element: invitation
sgml('', "\\documentclass[]{article}\n" .
"\\usepackage{invitation}\n" .
"\\begin{document}\n");
sgml('', "\\end{document}\n");
# Element: front
sgml('', "\\begin{Front}\n");
sgml('', "\\end{Front}\n");
# Element: to
sgml('', "\\To{");
sgml('', "}\n");
# Element: date
sgml('', "\\Date{");
sgml('', "}\n");
# Element: where
sgml('', "\\Where{");
sgml('', "}\n");
# Element: why
sgml('', "\\Why{");
sgml('', "}\n");
# Element: body
sgml('', "\\begin{Body}\n");
sgml('', "\\end{Body}\n");
# Element: par
sgml('', "\\par ");
sgml('', "\n");
# Element: emph
sgml('', "\\emph{");
sgml('', "}");
# Element: back
sgml('', "\\begin{Back}\n");
sgml('', "\\end{Back}\n");
# Element: signature
sgml('', "\\Signature{");
sgml('', "}\n");
#
# Default handlers
#
sgml('start_element',sub { die "Unknown element: " . $_[0]->name; });
sgml('cdata',sub { output $_[0]; });
sgml('re'," ");
sgml('pi',sub { die "Unknown processing instruction: " . $_[0]; });
sgml('entity',sub { die "Unknown external entity: " . $_[0]->name; });
sgml('conforming','');
1;