diff options
Diffstat (limited to 'tex/context/base/mkxl/lpdf-emb.lmt')
-rw-r--r-- | tex/context/base/mkxl/lpdf-emb.lmt | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/tex/context/base/mkxl/lpdf-emb.lmt b/tex/context/base/mkxl/lpdf-emb.lmt index a4fcb1b6b..5517d8051 100644 --- a/tex/context/base/mkxl/lpdf-emb.lmt +++ b/tex/context/base/mkxl/lpdf-emb.lmt @@ -1504,7 +1504,7 @@ do local f_stream = formatters["%.6N 0 d0 %s"] local f_stream_c = formatters["%.6N 0 0 0 0 0 d1 %s"] local f_stream_d = formatters["%.6N 0 d0 1 0 0 1 0 %.6N cm %s"] - local f_stream_s = formatters["%N 0 0 %N 0 0 cm /%s Do"] + -- local f_stream_s = formatters["%.6N 0 0 %.6N 0 0 cm /%s Do"] -- A type 3 font has at most 256 characters and Acrobat also wants a zero slot -- to be filled. We can share a mandate zero slot character. We also need to @@ -1546,11 +1546,11 @@ do local used = setmetatableindex("table") - function lpdf.registerfontmethod(name,f) - if f and not methods[name] then - methods[name] = f - end - end + -- function lpdf.registerfontmethod(name,f) + -- if f and not methods[name] then + -- methods[name] = f + -- end + -- end function methods.pdf(filename,details) local properties = details.properties @@ -1614,7 +1614,7 @@ do -- box inclusion (todo: we can share identical glyphs if needed but the gain -- is minimal especially when we use compact font mode) - lpdf.registerfontmethod("box",function(filename,details) + function methods.box(filename,details) local properties = details.properties local boxes = properties.indexdata[1] local xforms = pdfdictionary() @@ -1625,8 +1625,9 @@ do nofglyphs = nofglyphs + 1 local scale = units / scale -- e.g. 1000 / 12 local width = (data.width or 0) * bpfactor * scale + local depth = - (data.depth or 0) * bpfactor * scale local name = f_glyph(nofglyphs) - local stream = f_stream_s(scale,scale,name) + local stream = f_image_c_xy(scale,scale,0,depth,name) image.embedded_name = name image.embedded_stream = stream image.embedded_reference = pdfreference(image.objnum) @@ -1639,7 +1640,7 @@ do return pdfdictionary { XObject = xforms } end return boxes, 1/units, boxtopdf, wrapup, getresources - end) + end -- mps inclusion |