From 59947aaf3bf2ad07251a569a77338c8c41f9e377 Mon Sep 17 00:00:00 2001 From: Context Git Mirror Bot Date: Wed, 29 Apr 2015 20:15:05 +0200 Subject: 2015-04-29 19:33:00 --- tex/context/base/lpdf-xmp.lua | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'tex/context/base/lpdf-xmp.lua') 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 -- cgit v1.2.3