\ProvidesPackage{teixmlslides}[2000/06/22: support for TEI XML formatting, S Rahtz]
\RequirePackage{ifthen,longtable,nameref,graphicx}
\openin\@inputcheck=teixml.cfg
\ifeof\@inputcheck \relax
\else
\closein\@inputcheck 
 \input{teixml.cfg}
\fi
\def\VProcess#1{%
{\immediate\openout\TeiFileOut tei.file\relax
 \immediate\write\TeiFileOut{#1}\immediate\closeout\TeiFileOut}
 \color{black}\small\ttfamily{\@input{tei.file}}}

%\expandafter\def\expandafter\obeylines\expandafter{
%\expandafter\def\csname 8:\string^^M\endcsname{\\\null}}

\usepackage{amsmath}
\usepackage{unicode,ucharacters}
\definecolor{programframe}{rgb}{0,0,0.9}
\definecolor{programback}{RGB}{233,120,0}
\definecolor{egframe}{rgb}{0,0,0.9}
\definecolor{egback}{RGB}{233,239,153}
\definecolor{boxback}{RGB}{0,128,128}
\newif\ifPausing
\Pausingfalse
% List types
\def\Listordered{\begin{enumerate}\ifx\listrend\rend@pausing\Pausingtrue\fi}
\def\endListordered{\end{enumerate}}
\def\Listsimple{\begin{itemize}\ifx\listrend\rend@pausing\Pausingtrue\fi}
\def\Listunordered{\begin{itemize}\ifx\listrend\rend@pausing\Pausingtrue\fi}
\def\Listgloss{\begin{description}\ifx\listrend\rend@pausing\Pausingtrue\fi}
\def\endListgloss{\end{description}}
\def\Listbulleted{\begin{itemize}\ifx\listrend\rend@pausing\Pausingtrue\fi}
\def\endListbulleted{\end{itemize}}
\def\List{\begin{itemize}\ifx\listrend\rend@pausing\Pausingtrue\fi}
\def\endList{\end{itemize}}
\def\Listitemize{\begin{itemize}\ifx\listrend\rend@pausing\Pausingtrue\fi}
\def\endListitemize{\end{itemize}}
\def\Listnumbered{\begin{enumerate}\ifx\listrend\rend@pausing\Pausingtrue\fi}
\def\endListnumbered{\end{enumerate}}
\def\Listunordered{\begin{dinglist}{'052}\ifx\listrend\rend@pausing\Pausingtrue\fi}
\def\endListunordered{\end{dinglist}}
\def\endItem{\ifPausing\Mypause\fi}
\providecommand\Mypause{}
% items
\def\Itemordered{\item}
\def\Itembulleted{\item}
\def\Itemnumbered{\item}
\def\Itemunordered{\item}
\def\Itemitemize{\item}
\def\Itempausing{\item}
\def\Item{\item}
\def\Itemgloss{}

\def\supppdf{supp-pdf}
\let\FOinputIfFileExists\InputIfFileExists
\def\InputIfFileExists#1#2#3{%
 {\def\@tempa{#1}\ifx\@tempa\supppdf\else
   \FOinputIfFileExists{#1}{#2}{#3}\fi}}
\def\doTable#1\\{%
 \begin{tabular}{#1}%
}
\endinput