diff options
author | Hans Hagen <pragma@wxs.nl> | 2012-01-05 19:27:53 +0100 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2012-01-05 19:27:53 +0100 |
commit | 4b459764a30ae1fb1e124b1a7a5a44ecb5a4d54b (patch) | |
tree | c40189f3df34d9843149b5b0154b424df8de02dd /tex/context/base/page-mul.mkiv | |
parent | f55d2b463bb22fc74c5da3a3e0a699901540f727 (diff) | |
download | context-4b459764a30ae1fb1e124b1a7a5a44ecb5a4d54b.tar.gz |
beta 2011.12.31 13:16
Diffstat (limited to 'tex/context/base/page-mul.mkiv')
-rw-r--r-- | tex/context/base/page-mul.mkiv | 37 |
1 files changed, 20 insertions, 17 deletions
diff --git a/tex/context/base/page-mul.mkiv b/tex/context/base/page-mul.mkiv index 4fcb72719..b9e8daf7c 100644 --- a/tex/context/base/page-mul.mkiv +++ b/tex/context/base/page-mul.mkiv @@ -115,12 +115,6 @@ %D %D \interface \type{\ifinheritcolumns} \\ %D handle ragging or not \\ -%D \interface \type{\ifr@ggedbottom} \\ -%D use ragged bottoms \\ -%D \interface \type{\ifb@selinebottom} \\ -%D put the bottom line on the baseline \\ -%D \interface \type{\ifnormalbottom} \\ -%D put the bottom line at the baseline \\ %D %D \interface \type{\ifreversecolumns} \\ %D reverse the order in wich columns are flushed \\ @@ -541,7 +535,7 @@ %D One of the complications of flushing out the boxes is that %D \type{\precolumnbox} needs to be \type{\unvbox}'ed, otherwise %D there is too less flexibility in the page when using -%D \type{\r@ggedbottom}. It took a lot of time before these +%D \type{\raggedbottom}. It took a lot of time before these %D kind of problems were overcome. Using \type{\unvbox} at the %D wrong moment can generate \type{\balancingerror}'s. %D @@ -965,7 +959,8 @@ {\splitcurrentcolumn from \box\normalpagebox to \dimen0}% \setbox\restofpage\vbox{\unvbox\normalpagebox}% \ifinheritcolumns - \ifr@ggedbottom % vreemd + \ifcase\bottomraggednessmode + % 0 = ragged \dohandleallcolumns {\global\setbox\currentcolumnbox\vbox to \ht\firstcolumnbox {\dimen0\dp\currentcolumnbox @@ -977,14 +972,14 @@ \ifbottomnotes \else \dimen0\ht\firstcolumnbox \fi - \fi - \ifn@rmalbottom + \or + % 1 = normal \advance\dimen0 \maxdepth \dohandleallcolumns {\global\setbox\currentcolumnbox\vbox to \dimen0 {\unvbox\currentcolumnbox}}% - \fi - \ifb@selinebottom + \or + % 2 = baseline % the columns are on top of the baseline \fi \else @@ -1161,7 +1156,7 @@ \fi %\global\output{\balancingerror}% \page_otf_set_engine_output_routine{\balancingerror}% - \b@selinebottomtrue % forces depth in separation rule + \baselinebottom % forces depth in separation rule \flushcolumnedpage\plusone \multicolumnseject \egroup} @@ -1562,7 +1557,9 @@ \hskip.5\dimen0 \vrule \!!width\linewidth - \ifb@selinebottom\!!depth\strutdepth\fi + \ifnum\bottomraggednessmode=\plustwo % baselinebottom + \!!depth\strutdepth + \fi \hskip.5\dimen0\relax \stoptextproperties \egroup} @@ -1587,6 +1584,12 @@ \definecomplexorsimpleempty\startcolumns +% to be reconsidered ... (in any case they need to be unexpandable sinze 2011.12.30) + +\unexpanded\def\columns_align_option_yes {\stretchcolumnstrue \inheritcolumnsfalse}% todo: new key +\unexpanded\def\columns_align_option_no {\stretchcolumnsfalse\inheritcolumnsfalse}% todo: new key +\unexpanded\def\columns_align_option_text{\stretchcolumnsfalse\inheritcolumnstrue }% + \def\complexstartcolumns[#1]% %% \startcolumns {\bgroup \let\stopcolumns\egroup @@ -1611,9 +1614,9 @@ \doifelse\@@klbalance\v!yes \balancecolumnstrue \balancecolumnsfalse - \installalign\v!yes {\stretchcolumnstrue \inheritcolumnsfalse}% todo: new key - \installalign\v!no {\stretchcolumnsfalse\inheritcolumnsfalse}% todo: new key - \installalign\v!text{\stretchcolumnsfalse\inheritcolumnstrue }% + \installalign\v!yes {\columns_align_option_yes }% + \installalign\v!no {\columns_align_option_no }% + \installalign\v!text{\columns_align_option_text}% \stretchcolumnsfalse \inheritcolumnstrue \doifsomething\@@klalign{\expanded{\setupalign[\@@klalign]}}% |