diff options
author | Hans Hagen <pragma@wxs.nl> | 2020-07-31 11:03:33 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-07-31 11:03:33 +0200 |
commit | cbaeded86ee193677fe0cae364b564616557449d (patch) | |
tree | 1b3286f018db07027ab715f3352b61838af6e59f /tex/context/base/mkiv/strc-con.mkvi | |
parent | 4619c6e66ef47e8e4953142a5c65467a6b0a2c01 (diff) | |
download | context-cbaeded86ee193677fe0cae364b564616557449d.tar.gz |
2020-07-31 10:01:00
Diffstat (limited to 'tex/context/base/mkiv/strc-con.mkvi')
-rw-r--r-- | tex/context/base/mkiv/strc-con.mkvi | 41 |
1 files changed, 40 insertions, 1 deletions
diff --git a/tex/context/base/mkiv/strc-con.mkvi b/tex/context/base/mkiv/strc-con.mkvi index 1f5a1629f..66ff3097b 100644 --- a/tex/context/base/mkiv/strc-con.mkvi +++ b/tex/context/base/mkiv/strc-con.mkvi @@ -418,6 +418,8 @@ % \dostoptagged % tag \dostarttagged\t!constructioncontent\empty + %\freezeparagraphproperties + \updateparagraphshapes \ignorespaces} % args not needed \unexpanded\setvalue{\??constructionstophandler\v!construction}% @@ -433,7 +435,7 @@ \dorechecknextindentation} \unexpanded\def\boxedconstructionhead#1% - {\vtop + {\doifelse{\constructionalternativeparameter\c!alignbottom}{\v!yes}\vbox\vtop {\hsize\constructionsheadwidth \edef\p_strc_constructions_headalign{\constructionparameter\c!headalign}% \ifx\p_strc_constructions_headalign\empty \else @@ -919,6 +921,43 @@ \endgroup \stopsetups +\ifcase\contextlmtxmode \else + % just an empty check so that we can grep for contextlmtxmode in mkiv files +\fi + +% \definedescription[whatever][alternative=right:bottom] +% +% \startwhatever{just a small\\example} +% \input ward +% \stopwhatever + +\defineconstructionalternative + [\v!right:\v!bottom] + [%\c!width=7em, + %\c!distance=1em, + \c!alignbottom=\v!yes, + \c!renderingsetup=\??constructionrenderings:\v!right:\v!bottom] + +\startsetups[\??constructionrenderings:\v!right:\v!bottom] + \let\\=\crlf + \noindent + \leftskip\leftconstructionskip + \rightskip\dimexpr\rightconstructionskip+\constructionsheadwidth+\constructionsheaddistance\relax + \parfillskip\zeropoint + \strc_constructions_set_pure_box\v!flushright + \directparwrapper \relax {% + \hfilll + \rlap + {\kern\constructionsheaddistance + \copy\constructionheadbox}% + }% + \useconstructionstyleandcolor\c!style\c!color + \ignorespaces +\stopsetups + +%D This next feature will get an lmtx implementation (probably by using a new generic +%D close mechanism). + % you can use \placeclosesymbol or \qed to place a symbol at the end of a % construction |