% tex4ht-sage.cfg
% Copyright 2009 by Robert A. Beezer
%
% Supplies info for jsmath version to tex4ht command line and preamble
%   2009/01/28  Modified to build sage worksheets, dropped font info
%
% Call as   htlatex <tex-source-file> "tex4ht-sage" " -cmozhtf"
%   Implements  sageverbatim  environment of the sagetex package
%   Wraps contents of the environment with the tags
%   <sage>,</sage> as markers
%   Then a custom script converts contents to 
%   SAGE worksheet cell format
%   CSS additions suggested by jsMath author
%
   \Configure{@/BODY}{\the\sagetextoks\global\sagetextoks{}}
   \Preamble{xhtml,jsmath,info} 
     \ScriptEnv{sageverbatim}
        {\ifvmode \IgnorePar \fi
         \EndP\HCode{<sage>}\NoFonts\break}
        {\ifvmode \IgnorePar \fi
         \EndP\HCode{</sage>}\EndNoFonts\csname par\endcsname\ShowPar}
     \ScriptEnv{sageblock}
        {\ifvmode \IgnorePar \fi
         \EndP\HCode{<sage>}\NoFonts\break}
        {\ifvmode \IgnorePar \fi
         \EndP\HCode{</sage>}\EndNoFonts\csname par\endcsname\ShowPar}
     \ScriptEnv{sagesilent}
        {\ifvmode \IgnorePar \fi
         \EndP\HCode{<sage>}\NoFonts\break}
        {\ifvmode \IgnorePar \fi
         \EndP\HCode{</sage>}\EndNoFonts\csname par\endcsname\ShowPar}
   \Css{/* jsMath suggested additions for spacing control */}
   \Css{.jsMath_hiddenSpan {text-indent: 0px}}
   \Css{.typeset {text-indent: 0px}} 
   \AtBeginDocument{\InputIfFileExists{\jobname.sout}{}{\typeout{No file \jobname.sout.}}}

   \makeatletter
   \let\orisage\sage
   \let\orisagestr\sagestr
   \let\oriST@sageplot\ST@sageplot
   \newtoks\sagetextoks
   \def\sage#1{\orisage{#1}\savesage{#1}}%
   \def\sagestr#1{\orisagestr{#1}\savesage{#1}}%
   \def\ST@sageplot[#1][#2]#3{\savesage{show(#3)}\oriST@sageplot[#1][#2]{#3}}
   \makeatother

   \def\savesage#1{\expandafter\global\expandafter\sagetextoks\expandafter{\the\sagetextoks \HCode{<sage>\Hnewline
}\HCode{#1\Hnewline}\HCode{</sage>\Hnewline
}}}
   \Configure{HtmlPar}
{\the\sagetextoks\global\sagetextoks{}\HCode{<p class="noindent">}} 
{\the\sagetextoks\global\sagetextoks{}\HCode{<p class="indent">}} 
{\the\sagetextoks\global\sagetextoks{}}
{\the\sagetextoks\global\sagetextoks{}}

\Configure{$}
   {\Configure{@math}{}\DviMath\HCode{\string$}}
   {\EndDviMath \HCode{\string$}}{}


   \begin{document} 
   \EndPreamble