summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/luatex/minim-xmp
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2022-03-04 22:04:55 +0000
committerKarl Berry <karl@freefriends.org>2022-03-04 22:04:55 +0000
commitf4b65fd65868a9f68c17fa969bd5533b8c81af68 (patch)
tree20f68ebb5713403ef628f48ec4c41090013df5bc /Master/texmf-dist/tex/luatex/minim-xmp
parent2af24efcc003674f1cb52ea3284357faf60540f1 (diff)
minim* (4mar22)
git-svn-id: svn://tug.org/texlive/trunk@62419 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/luatex/minim-xmp')
-rw-r--r--Master/texmf-dist/tex/luatex/minim-xmp/minim-xmp.lua7
-rw-r--r--Master/texmf-dist/tex/luatex/minim-xmp/minim-xmp.tex4
2 files changed, 9 insertions, 2 deletions
diff --git a/Master/texmf-dist/tex/luatex/minim-xmp/minim-xmp.lua b/Master/texmf-dist/tex/luatex/minim-xmp/minim-xmp.lua
index ba01344ccd5..95275aef358 100644
--- a/Master/texmf-dist/tex/luatex/minim-xmp/minim-xmp.lua
+++ b/Master/texmf-dist/tex/luatex/minim-xmp/minim-xmp.lua
@@ -2,6 +2,7 @@
local M = { }
local alloc = require('minim-alloc')
alloc.remember('minim-xmp')
+local cb = require('minim-callbacks')
local function sorted_pairs(t)
local keys, i = { }, 0
@@ -506,11 +507,13 @@ M.aliases = {
version = { 'xmpMM:VersionID' },
}
-callback.register('finish_pdffile', function()
+cb.register('finish_pdffile', function()
+ if tex.count['writedocumentmetadata'] == 0 then return end
if #XMP > 1 then
alloc.err('Not all metadata has been written out.')
XMP = { [1] = XMP[1] }
- elseif #XMP > 0 then
+ end
+ if #XMP > 0 then
local metadata_obj = M.write_metadata()
local catalog = pdf.getcatalog() or ''
pdf.setcatalog(catalog..string.format('/Metadata %s 0 R', metadata_obj))
diff --git a/Master/texmf-dist/tex/luatex/minim-xmp/minim-xmp.tex b/Master/texmf-dist/tex/luatex/minim-xmp/minim-xmp.tex
index 2ec4adc8958..2548ad857bf 100644
--- a/Master/texmf-dist/tex/luatex/minim-xmp/minim-xmp.tex
+++ b/Master/texmf-dist/tex/luatex/minim-xmp/minim-xmp.tex
@@ -19,6 +19,10 @@
\newcount \metadataseparator
\metadataseparator = `\;
+% \writedocumentmetadata
+\newcount \writedocumentmetadata
+\writedocumentmetadata = 1
+
% Defined from the lua side:
%
% \getmetadata ns:key