summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/third
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2015-02-01 22:03:12 +0000
committerKarl Berry <karl@freefriends.org>2015-02-01 22:03:12 +0000
commit6dc0b898b70015fcaecc1921ff16d8915e742ce0 (patch)
treef2e6ae7f91d34ecd2793f848439fadb3c15ba1ca /Master/texmf-dist/tex/context/third
parentb5083d8d39054ab295db96360fcdfa6f247621f2 (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.mkvi120
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