685
edits
Changes
Jump to navigation
Jump to search
→Other stuff
-- Maybe you are searching for [[Modules]], ie extensions to ConTeXt's core functions.--
= Other stuffstuffs=
cfr. http://archive.contextgarden.net/message/20050415.075117.eaff60f9.html
'''WARNING THIS CODE DOES NOT WORK!!'''
<pre>
\newbox\linebox \newbox\snapbox
\newdimen\CurrentHsize
\newdimen\CurrentWdSnapBox
\def\eatlines{%
%\immediate\write16{1) Collect in lastbox}
\setbox\linebox=\lastbox %
%\immediate\write16{boxlinebox: wd=\the\wd\linebox}
%\immediate\write16{2) check void}
\ifvoid\linebox \immediate\write16{2a) void}
\else% \immediate\write16{2b) no void} % if it's not empty
\unskip\unpenalty % take whatever is
{\eatlines} % above it;
% collapse the line
%\immediate\write16{3) snapbox}
\setbox\snapbox\hbox{\unhcopy\linebox}% \showbox\snapbox
\ifdim\wd\snapbox>\CurrentWdSnapBox \global\CurrentWdSnapBox=\wd\snapbox\fi%
\ifdim\wd\snapbox<.98\wd\linebox%
\box\snapbox % take the one or the other,
\else \box\linebox \fi%
\fi}
</pre>
----
