summaryrefslogtreecommitdiff
path: root/tex/context/base/meta-pdf.mkiv
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/meta-pdf.mkiv')
-rw-r--r--tex/context/base/meta-pdf.mkiv14
1 files changed, 8 insertions, 6 deletions
diff --git a/tex/context/base/meta-pdf.mkiv b/tex/context/base/meta-pdf.mkiv
index d10734547..e8ce94146 100644
--- a/tex/context/base/meta-pdf.mkiv
+++ b/tex/context/base/meta-pdf.mkiv
@@ -28,7 +28,7 @@
%D Plugin.
-\def\mkconvertMPtoPDF
+\def\mkconvertMPtoPDF % watch the transparency reset
{\vbox\bgroup
\forgetall
\offinterlineskip
@@ -40,6 +40,7 @@
\PDFcomment{mps begin}%
\PDFcode{q 1 0 0 1 0 0 cm}%
\ctxlua{mptopdf.convertmpstopdf("\MPfilename")}\removeunwantedspaces
+ \dohandleMPresettransparency % a bit messy here, should be a toks
\PDFcode{Q}%
\PDFcomment{mps end}%
\stopMPresources
@@ -86,6 +87,7 @@
\executeifdefined{handleMPtext\MPtexttag}
{\setbox\scratchbox\hbox
{\font\temp=#1\space at #2\onebasepoint
+ \let\c\char
\temp
\MPfshowcommand{#3}}%
\setbox\scratchbox\hbox
@@ -113,11 +115,11 @@
%D The boundingbox.
\def\MPSboundingbox#1#2#3#4%
- {\xdef\MPllx{#1}
- \xdef\MPlly{#2}
- \xdef\MPurx{#3}
- \xdef\MPury{#4}
- \xdef\MPwidth {\the\dimexpr#3\onebasepoint-#1\onebasepoint\relax}
+ {\xdef\MPllx{#1}%
+ \xdef\MPlly{#2}%
+ \xdef\MPurx{#3}%
+ \xdef\MPury{#4}%
+ \xdef\MPwidth {\the\dimexpr#3\onebasepoint-#1\onebasepoint\relax}%
\xdef\MPheight{\the\dimexpr#4\onebasepoint-#2\onebasepoint\relax}}
\MPSboundingbox0000