summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/typo-par.mkiv
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/context/base/typo-par.mkiv')
-rw-r--r--Master/texmf-dist/tex/context/base/typo-par.mkiv102
1 files changed, 12 insertions, 90 deletions
diff --git a/Master/texmf-dist/tex/context/base/typo-par.mkiv b/Master/texmf-dist/tex/context/base/typo-par.mkiv
index 7153d1f8adc..8572f31b83b 100644
--- a/Master/texmf-dist/tex/context/base/typo-par.mkiv
+++ b/Master/texmf-dist/tex/context/base/typo-par.mkiv
@@ -1,8 +1,8 @@
%D \module
%D [ file=typo-par,
-%D version=2011.10.27,
+%D version=2008.09.30,
%D title=\CONTEXT\ Typesetting Macros,
-%D subtitle=Paragraphs,
+%D subtitle=Paragraph Building,
%D author=Hans Hagen,
%D date=\currentdate,
%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
@@ -11,97 +11,19 @@
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.
-\writestatus{loading}{ConTeXt Typesetting Macros / Paragraphs}
+\writestatus{loading}{ConTeXt Node Macros / Paragraph Building}
-%D This will change ... par specific attribute set and such.
+%D This is very experimental, undocumented, subjected to changes, etc. just as
+%D the underlying interfaces. But at least it's cleaned as part of the status-mkiv
+%D cleanup.
-\unprotect
-
-\registerctxluafile{typo-par}{1.001}
-
-\definesystemattribute[paragraphspecial][public]
-
-\unexpanded\def\setparagraphspecial[#1]%
- {\ctxlua{typesetters.paragraphs.set("#1")}}
-
-\appendtoks
- \attribute\paragraphspecialattribute\attributeunsetvalue
-\to \everyforgetall
-
-%D For the moment here: dropped caps redone. In addition to the
-%D parameters shown in the example you can use the \type {style} and
-%D more low level \type {font} keys to set up the font where
-%D the first one wins. If you don't like the behaviour you can always
-%D roll out your own command.
-%D
-%D \starttyping
-%D \placeinitial \input ward \par \input ward \par \placeinitial \input tufte
-%D
-%D \setupinitial
-%D [location=text,
-%D n=2,
-%D color=darkred,
-%D distance=-1em,
-%D hoffset=1em,
-%D voffset=-3ex,
-%D before=\blank]
-%D
-%D \placeinitial \input ward \par \input ward \placeinitial \input tufte
-%D \stoptyping
+% \startparbuilder[basic]
+% \input tufte \par
+% \stopparbuilder
-\installcorenamespace{initial}
-
-\installsimplecommandhandler \??initial {initial} \??initial
-
-\appendtoks
- \checkinitialparent % this might become automatic
-\to \everysetupinitial
-
-\def\v_typo_initials_auto_scale % magic
- {\the\dimexpr\lineheight*\initialparameter\c!n-\initialparameter\c!voffset\relax}
-
-\setupinitial
- [\c!location=\v!text,
- \c!n=3,
- % \s!font=Bold sa 4,
- \s!font=Bold at \v_typo_initials_auto_scale,
- \c!distance=.125em,
- \c!hoffset=\zeropoint,
- \c!voffset=-1ex,
- \c!style=,
- \c!color=,
- \c!before=\blank]
-
-\unexpanded\def\placeinitial
- {\dosingleempty\typo_initials_place}
+\unprotect
-\def\typo_initials_place[#1]% todo: optional text
- {\par
- \begingroup
- \edef\currentinitial{#1}%
- \begingroup
- \useinitialcolorparameter\c!color
- \ctxlua{typesetters.paragraphs.droppers.set {
- location = "\initialparameter\c!location",
- enabled = true,
- n = \number\initialparameter\c!n,
- distance = \number\dimexpr\initialparameter\c!distance,
- hoffset = \number\dimexpr\initialparameter\c!hoffset,
- voffset = \number\dimexpr\initialparameter\c!voffset,
- ma = \the\attribute\colormodelattribute ,
- ca = \the\attribute\colorattribute ,
- ta = \the\attribute\transparencyattribute
- }}%
- \stopluacode
- \endgroup
- \begingroup
- \doifelsenothing{\initialparameter\c!style}
- {\definedfont[\initialparameter\s!font]}
- {\useinitialstyleparameter\c!style}%
- \ctxlua{typesetters.paragraphs.droppers.freeze()}%
- \endgroup
- \endgroup
- \setparagraphspecial[1]%
- \namedinitialparameter{#1}\c!before}
+\registerctxluafile{node-ltp}{1.001}
+\registerctxluafile{trac-par}{1.001}
\protect \endinput