diff options
author | Hans Hagen <pragma@wxs.nl> | 2011-06-16 12:50:00 +0200 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2011-06-16 12:50:00 +0200 |
commit | c768d04a83193229af281526797c8fc4e64d589f (patch) | |
tree | 599bb1fdf466b5a9de7181a0758608e8ad164824 /tex/context/base/strc-flt.mkiv | |
parent | 084756f44fc08cb9a1803a31e34a31f584fd19f9 (diff) | |
download | context-c768d04a83193229af281526797c8fc4e64d589f.tar.gz |
beta 2011.06.16 12:50
Diffstat (limited to 'tex/context/base/strc-flt.mkiv')
-rw-r--r-- | tex/context/base/strc-flt.mkiv | 20 |
1 files changed, 15 insertions, 5 deletions
diff --git a/tex/context/base/strc-flt.mkiv b/tex/context/base/strc-flt.mkiv index 9d0b5b0d7..4d3689b3c 100644 --- a/tex/context/base/strc-flt.mkiv +++ b/tex/context/base/strc-flt.mkiv @@ -1233,12 +1233,22 @@ \ifdefined\moveboxontogrid\else \let\movecaptionontogrid\gobblethreearguments \fi +% \def\locatefloatbox +% {\alignstrutmode\zerocount +% \shiftalignedline +% {\floatparameter\c!leftmargin }{\floatparameter\c!rightmargin}% +% {\floatparameter\c!innermargin}{\floatparameter\c!outermargin}% +% \alignedline{\floatparameter\c!location}\v!middle} +% +% A quick hack by WS: + \def\locatefloatbox - {\alignstrutmode\zerocount - \shiftalignedline - {\floatparameter\c!leftmargin }{\floatparameter\c!rightmargin}% - {\floatparameter\c!innermargin}{\floatparameter\c!outermargin}% - \alignedline{\floatparameter\c!location}\v!middle} + {\alignstrutmode\zerocount + \doifnotcommon{\floatcaptionparameter\c!location}{\v!outermargin,\v!innermargin,\v!leftmargin,\v!rightmargin} + {\shiftalignedline + {\floatparameter\c!leftmargin }{\floatparameter\c!rightmargin}% + {\floatparameter\c!innermargin}{\floatparameter\c!outermargin}}% + \alignedline{\floatparameter\c!location}\v!middle} \def\locatecaptionbox {\alignstrutmode\zerocount |