diff options
author | Karl Berry <karl@freefriends.org> | 2022-03-04 22:04:55 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2022-03-04 22:04:55 +0000 |
commit | f4b65fd65868a9f68c17fa969bd5533b8c81af68 (patch) | |
tree | 20f68ebb5713403ef628f48ec4c41090013df5bc /Master/texmf-dist/tex/luatex/minim-xmp | |
parent | 2af24efcc003674f1cb52ea3284357faf60540f1 (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.lua | 7 | ||||
-rw-r--r-- | Master/texmf-dist/tex/luatex/minim-xmp/minim-xmp.tex | 4 |
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 |