diff options
| author | Hans Hagen <pragma@wxs.nl> | 2012-05-06 21:53:00 +0200 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2012-05-06 21:53:00 +0200 |
| commit | 083fbf2fefcb875ba9b9beb8567cb71c282adb31 (patch) | |
| tree | 227f52e50b2b87d8db15ef7741a3f3aa5eb68153 /tex/context/base/mlib-pps.mkiv | |
| parent | 6edcfc834f2d62a9eac0fbfde575dee821facef5 (diff) | |
| download | context-083fbf2fefcb875ba9b9beb8567cb71c282adb31.tar.gz | |
beta 2012.05.06 21:53
Diffstat (limited to 'tex/context/base/mlib-pps.mkiv')
| -rw-r--r-- | tex/context/base/mlib-pps.mkiv | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/tex/context/base/mlib-pps.mkiv b/tex/context/base/mlib-pps.mkiv index 4a6b89909..cb6120066 100644 --- a/tex/context/base/mlib-pps.mkiv +++ b/tex/context/base/mlib-pps.mkiv @@ -124,14 +124,16 @@ \def\doMPLIBstopgroup#1#2#3#4#5#6% some day this might happen elsewhere {\egroup - \wd\scratchbox \dimexpr#5\onebasepoint-#3\onebasepoint\relax + \setbox\scratchbox\hbox{\hskip\onebasepoint\box\scratchbox}% weird correction + \wd\scratchbox \dimexpr#5\onebasepoint-#3\onebasepoint+2\onebasepoint\relax \ht\scratchbox #6\onebasepoint \dp\scratchbox-#4\onebasepoint \pdfxform attr {/Group << /S /Transparency /I \ifnum#1=1 true \else false \fi /K \ifnum#1=1 true \else false \fi >>} resources {\pdfbackendcurrentresources} \scratchbox - \setbox\scratchbox\hbox\bgroup\pdfrefxform\pdflastxform\egroup + \setbox\scratchbox\hbox\bgroup\hskip-\onebasepoint\pdfrefxform\pdflastxform\egroup + \setbox\scratchbox\hbox\bgroup\hskip-\onebasepoint\pdfrefxform\pdflastxform\egroup \wd\scratchbox\zeropoint \ht\scratchbox\zeropoint \dp\scratchbox\zeropoint |