diff options
| author | Hans Hagen <pragma@wxs.nl> | 2018-10-10 21:09:32 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2018-10-10 21:09:32 +0200 |
| commit | 9f36318b0e571bcbc93dc2112d01bbf2178ed020 (patch) | |
| tree | d6b075357717f7fde0bdf73aa364dbbca5417c50 /tex/context/base/mkiv/lpdf-wid.lua | |
| parent | 753dd0cbafc567d4960c5fc4888ccb4e2302c64d (diff) | |
| download | context-9f36318b0e571bcbc93dc2112d01bbf2178ed020.tar.gz | |
2018-10-08 17:52:00
Diffstat (limited to 'tex/context/base/mkiv/lpdf-wid.lua')
| -rw-r--r-- | tex/context/base/mkiv/lpdf-wid.lua | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/tex/context/base/mkiv/lpdf-wid.lua b/tex/context/base/mkiv/lpdf-wid.lua index 5793fc723..a929ed2ce 100644 --- a/tex/context/base/mkiv/lpdf-wid.lua +++ b/tex/context/base/mkiv/lpdf-wid.lua @@ -267,9 +267,13 @@ function codeinjections.embedfile(specification) local keepdir = specification.keepdir -- can change local usedname = specification.usedname local filetype = specification.filetype + local compress = specification.compress if filename == "" then filename = nil end + if compress == nil then + compress = true + end if data then local r = filestreams[hash] if r == false then @@ -324,7 +328,7 @@ function codeinjections.embedfile(specification) specification.data = true -- signal that still data but already flushed else local foundname = specification.foundname or filename - f = pdfflushstreamfileobject(foundname,a) + f = pdfflushstreamfileobject(foundname,a,compress) end local d = pdfdictionary { Type = pdfconstant("Filespec"), @@ -663,6 +667,7 @@ local function insertrendering(specification) descriptor.EF = codeinjections.embedfile { file = filename, mimetype = mimetype, -- yes or no + compress = false, } end local clip = pdfdictionary { |