summaryrefslogtreecommitdiff
path: root/tex/context/base/lpdf-xmp.lua
diff options
context:
space:
mode:
authorContext Git Mirror Bot <phg42.2a@gmail.com>2015-04-29 20:15:05 +0200
committerContext Git Mirror Bot <phg42.2a@gmail.com>2015-04-29 20:15:05 +0200
commit59947aaf3bf2ad07251a569a77338c8c41f9e377 (patch)
tree0da53be81a91ea3bed5bcb4c5be8f725e6da54aa /tex/context/base/lpdf-xmp.lua
parentd60cd418153b3ea6909c8b4691a160f54c41a670 (diff)
downloadcontext-59947aaf3bf2ad07251a569a77338c8c41f9e377.tar.gz
2015-04-29 19:33:00
Diffstat (limited to 'tex/context/base/lpdf-xmp.lua')
-rw-r--r--tex/context/base/lpdf-xmp.lua5
1 files changed, 3 insertions, 2 deletions
diff --git a/tex/context/base/lpdf-xmp.lua b/tex/context/base/lpdf-xmp.lua
index b44c57b42..b1a795c4b 100644
--- a/tex/context/base/lpdf-xmp.lua
+++ b/tex/context/base/lpdf-xmp.lua
@@ -152,7 +152,8 @@ end
local t = { } for i=1,24 do t[i] = random() end
local function flushxmpinfo()
- commands.freezerandomseed(os.clock()) -- hack
+ commands.pushrandomseed()
+ commands.setrandomseed(os.time())
local t = { } for i=1,24 do t[i] = char(96 + random(26)) end
local packetid = concat(t)
@@ -201,7 +202,7 @@ local function flushxmpinfo()
local r = pdfflushstreamobject(blob,md,false) -- uncompressed
lpdf.addtocatalog("Metadata",pdfreference(r))
- commands.defrostrandomseed() -- hack
+ commands.poprandomseed() -- hack
end
-- his will be enabled when we can inhibit compression for a stream at the lua end