% invitation.sty
% Package to format invitation.xml
\setlength{\textwidth}{22pc}
\setlength{\parskip}{1ex}
\setlength{\parindent}{0pt}
\pagestyle{empty}%% Turn off page numbering
\RequirePackage{array,calc}
\newcommand{\ToTitle}{To whom}
\newcommand{\WhyTitle}{Occasion}
\newcommand{\WhereTitle}{Venue}
\newcommand{\DateTitle}{When}
\newcommand{\SignatureTitle}{From}
\DeclareOption{francais}{%  French text for fixed texts
  \renewcommand{\ToTitle}{À}
  \renewcommand{\WhyTitle}{À l'occasion de}
  \renewcommand{\WhereTitle}{Où}
  \renewcommand{\DateTitle}{Quand}
  \renewcommand{\SignatureTitle}{De la part de}}
\newenvironment{Front}%
  {\begin{center}
     \Huge\sffamily INVITATION
   \end{center}
  }
  {\begin{flushleft}
   \rule{\linewidth}{1pt}\\[2mm]
   \begin{tabular}{@{}>{\bfseries}ll@{}}
   \ToTitle:    & \@To     \\
   \WhyTitle:   & \@Why    \\
   \WhereTitle: & \@Where  \\
   \DateTitle:  & \@Date   
   \end{tabular}\\[2mm]
   \rule{\linewidth}{1pt}
   \end{flushleft}
  }
\newenvironment{Body}{\vspace*{\parskip}}{\vspace*{\parskip}}
\newenvironment{Back}
  {\begin{flushleft}}
  {\hspace*{.5\linewidth}\fbox{\SignatureTitle: \emph{\@Sig}}
   \end{flushleft}
  }
\newcommand{\To}[1]{\gdef\@To{#1}}
\newcommand{\Date}[1]{\gdef\@Date{#1}}
\newcommand{\Where}[1]{\gdef\@Where{#1}}
\newcommand{\Why}[1]{\gdef\@Why{#1}}
\newcommand{\Signature}[1]{\gdef\@Sig{#1}}
\ProcessOptions
