diff options
| author | Hans Hagen <pragma@wxs.nl> | 2010-02-10 10:38:00 +0100 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2010-02-10 10:38:00 +0100 |
| commit | b39044522da766a9e97ad0f41246fcc2011dee52 (patch) | |
| tree | 1a23892287f2739cccdb795fe19fe41a78235363 /tex/context/base/lpdf-xmp.lua | |
| parent | 384ee54e547f5fb05fdbaa3d92a1aa2720402d4c (diff) | |
| download | context-b39044522da766a9e97ad0f41246fcc2011dee52.tar.gz | |
beta 2010.02.10 10:38
Diffstat (limited to 'tex/context/base/lpdf-xmp.lua')
| -rw-r--r-- | tex/context/base/lpdf-xmp.lua | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/tex/context/base/lpdf-xmp.lua b/tex/context/base/lpdf-xmp.lua index 78638efbb..9a936e64d 100644 --- a/tex/context/base/lpdf-xmp.lua +++ b/tex/context/base/lpdf-xmp.lua @@ -168,11 +168,15 @@ local function flushxmpinfo() texio.write_nl("log","") texio.write("log","\n% ",(gsub(blob,"[\r\n]","\n%% ")),"\n") end + blob = format(xpacket,packetid,blob) + if tex.pdfcompresslevel > 0 then + blob = gsub(blob,">%s+<","><") + end local r = pdf.obj { immediate = true, compresslevel = 0, type = "stream", - string = format(xpacket,packetid,blob), + string = blob, attr = md(), } lpdf.addtocatalog("Metadata",lpdf.reference(r)) |