diff options
author | Karl Berry <karl@freefriends.org> | 2015-02-01 22:03:12 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2015-02-01 22:03:12 +0000 |
commit | 6dc0b898b70015fcaecc1921ff16d8915e742ce0 (patch) | |
tree | f2e6ae7f91d34ecd2793f848439fadb3c15ba1ca /Master/texmf-dist/tex/context/third | |
parent | b5083d8d39054ab295db96360fcdfa6f247621f2 (diff) |
context-title (1feb15)
git-svn-id: svn://tug.org/texlive/trunk@36189 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/context/third')
-rw-r--r-- | Master/texmf-dist/tex/context/third/title/t-title.mkvi | 120 |
1 files changed, 120 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/context/third/title/t-title.mkvi b/Master/texmf-dist/tex/context/third/title/t-title.mkvi new file mode 100644 index 00000000000..3b85379e571 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/title/t-title.mkvi @@ -0,0 +1,120 @@ +%D \module +%D [ file=t-title, +%D version=2012.04.11, +%D title=\CONTEXT\ User Module, +%D subtitle=Document titles, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +%M \loadsetups[t-title.xml] + +%D \showsetup{placetitle} +%D \showsetup{setuptitle} +%D \showsetup{titleelement} + +\writestatus{loading}{ConTeXt User Module / Document titles} + +\unprotect + +\installnamespace {title} +\installcommandhandler \????title {title} \????title + +\unexpanded\def\title_place + {\begingroup + \dostarttagged\t!division\v!title + \dosingleempty\title_arguments} + +\def\title_arguments[#parameters]% + {\let\currenttitle\empty + \iffirstargument\setupcurrenttitle[#parameters]\fi + \autosetups{\roottitleparameter\c!setups}% + \dostoptagged + \doif{\roottitleparameter\c!pagestate}\v!stop{\aftergroup\noheaderandfooterlines}% + \endgroup} + +\def\title_parameter#element% + {\begingroup + \def\currenttitle{#element}% + \usetitlestyleandcolor\c!style\c!color + \dostarttagged\t!construct\currenttitle + \setupinterlinespace\roottitleparameter\currenttitle\par + \dostoptagged + \endgroup} + +\let\placetitle \title_place +\let\titleelement\title_parameter + +\startsetups title:default + + \blank[\roottitleparameter\c!spacebefore] + + \startalignment[\roottitleparameter\c!align] + + \titleelement\c!title + + \blank[1.5em] + + \titleelement\c!author + + \blank[1em] + + \titleelement\c!date + + \stopalignment + + + \blank[\roottitleparameter\c!spaceafter] + +\stopsetups + +\setuptitle + [\c!spacebefore={\v!force,2em}, + \c!spaceafter={1.5em}, + \c!align=\v!middle, + \c!pagestate=\v!stop, + \c!setups=title:default] + +\setuptitle + [\c!title] + [\c!style=\tfd, + \c!color=] + +\setuptitle + [\c!author,\c!date] + [\c!style=\tfa, + \c!color=] + +\protect + +\continueifinputfile{t-title.mkvi} + +\starttext + +\placetitle + [author=Ben Lee User, + title=How to write a \tex{placetitle} command, + date=\currentdate\space\currenttime] + +\dorecurse{6} + {\startparagraph + \input tufte\par + \stopparagraph} + +\stoptext
\ No newline at end of file |