summaryrefslogtreecommitdiff
path: root/tex/context/base/strc-con.mkvi
diff options
context:
space:
mode:
authorContext Git Mirror Bot <phg42.2a@gmail.com>2015-02-03 22:15:05 +0100
committerContext Git Mirror Bot <phg42.2a@gmail.com>2015-02-03 22:15:05 +0100
commitb52a3ec06867c6722c0f6aeeeae57029235e53fb (patch)
tree108a6cf2226cefbfe7517c8b4b4a1a3d9d7adbc3 /tex/context/base/strc-con.mkvi
parentdd7b0113318332d153bf0b8cddbdfef4e1e9f90f (diff)
downloadcontext-b52a3ec06867c6722c0f6aeeeae57029235e53fb.tar.gz
2015-02-03 21:39:00
Diffstat (limited to 'tex/context/base/strc-con.mkvi')
-rw-r--r--tex/context/base/strc-con.mkvi11
1 files changed, 9 insertions, 2 deletions
diff --git a/tex/context/base/strc-con.mkvi b/tex/context/base/strc-con.mkvi
index e32c3dd61..4a9315f33 100644
--- a/tex/context/base/strc-con.mkvi
+++ b/tex/context/base/strc-con.mkvi
@@ -263,7 +263,9 @@
\def\strc_constructions_ignore_head
{\constructionsheaddistance\zeropoint
- \constructionsheadwidth \zeropoint}
+ \constructionsheadwidth \zeropoint
+ % we also need to make sure that no stretch creeps in (new per 2015-02-02, for Alan)
+ \settrue\c_strc_constructions_distance_none}
\let\currentconstructionhash\??construction
@@ -325,7 +327,7 @@
\else
\strc_constructions_preroll_head\currentconstructionsample
\ifzeropt\wd\constructionheadbox
- \strc_constructions_ignore_head
+ \strc_constructions_ignore_head
\else
\strc_constructions_set_width_and_distance
\fi
@@ -530,6 +532,11 @@
% The setups. These only deal with placement of the descriptor and initializing the
% environment. The wrapping happens elsewhere.
+% todo: optimize the setups with
+%
+% \ifconditional\c_strc_constructions_distance_none : no need for skip
+% \ifzeropt\wd\constructionheadbox : no need for box and skips
+
\startsetups[\??constructionrenderings:\v!left]
\edef\p_strc_constructions_hang{\constructionparameter\c!hang}%
\doifsetupselse{\??constructionrenderings:\v!left:\p_strc_constructions_hang} {