summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/strc-ind.mkxl
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/mkiv/strc-ind.mkxl')
-rw-r--r--tex/context/base/mkiv/strc-ind.mkxl128
1 files changed, 0 insertions, 128 deletions
diff --git a/tex/context/base/mkiv/strc-ind.mkxl b/tex/context/base/mkiv/strc-ind.mkxl
deleted file mode 100644
index 31d7eb575..000000000
--- a/tex/context/base/mkiv/strc-ind.mkxl
+++ /dev/null
@@ -1,128 +0,0 @@
-%D \module
-%D [ file=strc-ind, % was part of strc-des,
-%D version=2008.10.20,
-%D title=\CONTEXT\ Structure Macros,
-%D subtitle=Indented Text,
-%D author=Hans Hagen,
-%D date=\currentdate,
-%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
-%C
-%C This module is part of the \CONTEXT\ macro||package and is
-%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
-%C details.
-
-\writestatus{loading}{ConTeXt Structure Macros / Indented Text}
-
-\unprotect
-
-%D \macros
-%D {defineindentedtext,
-%D setupindentedtext}
-%D
-%D Ok, we keep it but with a different command as it all looks too
-%D much like indentation and indenting. We also assume start/stop
-%D usage or some explicit par.
-
-\installcorenamespace{indentedtext}
-
-\installcommandhandler \??indentedtext {indentedtext} \??indentedtext
-
-%D \startbuffer
-%D \defineindentedtext[one][text=one]
-%D \defineindentedtext[two][text=two]
-%D
-%D \one test test \par
-%D \subone test test \par
-%D \subtwo test test \par
-%D \subsubone test test \par
-%D
-%D \startone
-%D test test
-%D \startone
-%D test test
-%D \startone
-%D test test
-%D \stopone
-%D \starttwo
-%D test test
-%D \startone
-%D test test
-%D \stopone
-%D \stoptwo
-%D \stopone
-%D \stopone
-%D \stopbuffer
-%D
-%D \typebuffer \getbuffer
-
-\newcount\c_strc_indentedtexts_nesting
-\newdimen\d_strc_indentedtexts_width
-\newdimen\d_strc_indentedtexts_distance
-
-\appendtoks
- \frozen\instance\setuevalue {\e!start\currentindentedtext}{\strc_indentedtexts_start{\currentindentedtext}\c_strc_indentedtexts_nesting}%
- \frozen\instance\setuevalue {\e!stop \currentindentedtext}{\strc_indentedtexts_stop}%
- % to be avoided ... might go away
- \frozen\instance\setuevalue {\currentindentedtext}{\strc_indentedtexts_direct{\currentindentedtext}{0}}%
- \frozen\instance\setuevalue {\v!sub\currentindentedtext}{\strc_indentedtexts_direct{\currentindentedtext}{1}}%
- \frozen\instance\setuevalue{\v!sub\v!sub\currentindentedtext}{\strc_indentedtexts_direct{\currentindentedtext}{2}}%
-\to \everydefineindentedtext
-
-\protected\def\strc_indentedtexts_start#1#2% we need to get rid of \spr
- {\par
- \begingroup
- \edef\currentindentedtext{#1}%
- \c_strc_indentedtexts_nesting#2\relax
- \indentedtextparameter\c!before
- \d_strc_indentedtexts_distance\indentedtextparameter\c!distance\relax
- \doifnothing{\indentedtextparameter\c!sample}
- {\setindentedtextparameter\c!sample{\indentedtextparameter\c!text}}%
- \assignwidth
- {\indentedtextparameter\c!width}
- {\d_strc_indentedtexts_width}
- {\useindentedtextstyleandcolor\c!headstyle\c!headcolor
- \indentedtextparameter\c!sample
- \spr{\indentedtextparameter\c!separator}}
- {\d_strc_indentedtexts_distance}%
- \advance\d_strc_indentedtexts_width \d_strc_indentedtexts_distance
- \setbox\scratchbox\hbox to \d_strc_indentedtexts_width
- {\useindentedtextstyleandcolor\c!headstyle\c!headcolor
- \strut
- \indentedtextparameter\c!text
- \hss
- \spr{\indentedtextparameter\c!separator}%
- \hskip\d_strc_indentedtexts_distance}%
- \parindent\zeropoint
- \hskip\c_strc_indentedtexts_nesting\d_strc_indentedtexts_width
- \advance\c_strc_indentedtexts_nesting\plusone
- \dontleavehmode\box\scratchbox
- \hangindent\c_strc_indentedtexts_nesting\d_strc_indentedtexts_width
- \useindentedtextstyleandcolor\c!style\c!color}
-
-\protected\def\strc_indentedtexts_stop
- {\indentedtextparameter\c!after
- \par
- \endgroup}
-
-\permanent\tolerant\protected\def\startindentedtext[#1]%
- {\strc_indentedtexts_start{#1}\c_strc_indentedtexts_nesting}
-
-\permanent\let\stopindentedtext\strc_indentedtexts_stop
-
-\protected\def\strc_indentedtexts_direct#1#2#3\par % no longer clever grabpar trickery
- {\strc_indentedtexts_start{#1}{#2}#3\strc_indentedtexts_stop}
-
-\setupindentedtext
- [\c!style=\v!normal,
- \c!headstyle=\v!normal,
- %\c!color=,
- %\c!headcolor=,
- \c!width=\v!fit,
- \c!text=\unknown,
- %\c!sample=,
- \c!before=\blank,
- \c!after=\blank,
- \c!distance=1em,
- \c!separator={ :}]
-
-\protect \endinput