summaryrefslogtreecommitdiff
path: root/tex/context/base/strc-flt.mkiv
diff options
context:
space:
mode:
authorMarius <mariausol@gmail.com>2011-06-16 14:00:12 +0300
committerMarius <mariausol@gmail.com>2011-06-16 14:00:12 +0300
commitf7430075a5d36ba3731ab77b157f6df498ef17e8 (patch)
treeb216d0792a61bd41fe0d4e4c86cb6595f2d5dfa7 /tex/context/base/strc-flt.mkiv
parentca80244b2a175882b1667a50bb5d2be2ca9ef818 (diff)
downloadcontext-f7430075a5d36ba3731ab77b157f6df498ef17e8.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.mkiv20
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