diff options
author | Karl Berry <karl@freefriends.org> | 2006-01-12 23:46:03 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-01-12 23:46:03 +0000 |
commit | 873660d1a83ece926fe7206288dda9c36b349c1b (patch) | |
tree | a48f77125c309a355b5d0eb58d6b24446abe9d62 /Master/texmf-dist/tex/generic/tex4ht/verse.4ht | |
parent | 2939242967231097459df0fc3150fabc2f639111 (diff) |
generic 1
git-svn-id: svn://tug.org/texlive/trunk@613 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/tex4ht/verse.4ht')
-rw-r--r-- | Master/texmf-dist/tex/generic/tex4ht/verse.4ht | 73 |
1 files changed, 73 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/tex4ht/verse.4ht b/Master/texmf-dist/tex/generic/tex4ht/verse.4ht new file mode 100644 index 00000000000..920701e58a0 --- /dev/null +++ b/Master/texmf-dist/tex/generic/tex4ht/verse.4ht @@ -0,0 +1,73 @@ +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% verse.4ht 2005-10-23-04:19 % +% Copyright (C) 2003--2005 Eitan M. Gurari % +% % +% This work may be distributed and/or modified under the % +% conditions of the LaTeX Project Public License, either % +% version 1.3 of this license or (at your option) any % +% later version. The latest version of this license is % +% in % +% http://www.latex-project.org/lppl.txt % +% and version 1.3 or later is part of all distributions % +% of LaTeX version 2003/12/01 or later. % +% % +% This work has the LPPL maintenance status "maintained".% +% % +% This Current Maintainer of this work % +% is Eitan M. Gurari. % +% % +% If you modify this program your changing its signature % +% with a directive of the following form will be % +% appreciated. % +% \message{signature} % +% % +% gurari@cse.ohio-state.edu % +% http://www.cse.ohio-state.edu/~gurari % +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\immediate\write-1{version 2005-10-23-04:19} + +\def\@vsptitle[#1]#2{% + \csname phantomsection\endcsname +% + \a:poemtitle + \addcontentsline{toc}{\poemtoc}{#1} + \poemtitlemark{#1}% + \b:poemtitle + \@vstypeptitle{#2}% + \c:poemtitle + \@afterheading} +\def\@vssptitle#1{% + \a:likepoemtitle + \@vstypeptitle{#1}% + \b:likepoemtitle + \@afterheading} +\NewConfigure{poemtitle}{3} +\NewConfigure{likepoemtitle}{2} +\pend:def\@vscentercr{% + \let\incr:vsline\incr@vsline + \def\incr@vsline{\let\incr@vsline\incr:vsline}% +} +\pend:def\start@vsline{\a:verseline \incr@vsline} +\renewcommand{\@vsifbang}[1]{\@ifnextchar !{% + \b:verseline\incr@vsline \@firstoftwo{#1}}} +\expand:after{\let\sv:verse}\csname \string\verse\endcsname +\expandafter\def\csname \string\verse\endcsname[#1]{% + \let\:temp\refstepcounter + \def\refstepcounter##1\let{\let\refstepcounter\:temp\let}% + \sv:verse[#1]% + \a:verseline \expandafter\ifx \csname c@verse\endcsname\relax \else + \refstepcounter{verse}% +\fi +% + \setcounter{poemline}{0}% + \setcounter{vslineno}{1}% + \incr@vsline +} +\NewConfigure{verseline}{2} +\pend:defI\flagverse{\a:flagverse} +\append:defI\flagverse{\b:flagverse} +\NewConfigure{flagverse}{2} + +\Hinput{verse} +\endinput + |