diff options
Diffstat (limited to 'src/luaotfload-colors.lua')
| -rw-r--r-- | src/luaotfload-colors.lua | 18 |
1 files changed, 14 insertions, 4 deletions
diff --git a/src/luaotfload-colors.lua b/src/luaotfload-colors.lua index ff4dc13..8035210 100644 --- a/src/luaotfload-colors.lua +++ b/src/luaotfload-colors.lua @@ -40,10 +40,9 @@ local setattribute = nodedirect.set_attribute local texset = tex.set local texget = tex.get -local texsettoks = tex.settoks -local texgettoks = tex.gettoks local stringformat = string.format +local concat = table.concat local otffeatures = fonts.constructors.newfeatures("otf") local identifiers = fonts.hashes.identifiers @@ -311,6 +310,9 @@ node_colorize = function (head, current_color) return head, current_color end +local pgf_extgs = { } +luaotfload.pgf_extgs = pgf_extgs + --- node -> node local color_handler = function (head) head = todirect(head) @@ -324,7 +326,7 @@ local color_handler = function (head) local no_extgs = not tpr:find("/ExtGState<<.*>>") local pgf_loaded = no_extgs and luaotfload.pgf_loaded if pgf_loaded then - tpr = texgettoks(pgf_loaded) -- see luaotfload.sty + tpr = concat(pgf_extgs) end local t = "" @@ -336,7 +338,7 @@ local color_handler = function (head) end if t ~= "" then if pgf_loaded then - texsettoks("global", pgf_loaded, tpr..t) + pgf_extgs[#pgf_extgs+1] = t else if no_extgs then tpr = tpr .. "/ExtGState<<>>" @@ -377,5 +379,13 @@ add_color_callback = function ( ) end end +tex.sprint("\\count255=\\catcode`@ \\catcode`@=11 ", + "\\ifdefined\\AtBeginDocument\\else\\def\\AtBeginDocument#1{#1}\\fi", + "\\AtBeginDocument{\\ifdefined\\pgfutil@everybye", + "\\directlua{luaotfload.pgf_loaded=true}\\begingroup", + "\\toks@{\\pgf@sys@addpdfresource@extgs@plain{\\directlua{tex.sprint(luaotfload.pgf_extgs)}}}", + "\\edef\\x{\\endgroup\\noexpand\\pgfutil@everybye{\\the\\toks@\\the\\pgfutil@everybye}}\\x", + "\\fi}\\catcode`@=\\count255 ") + -- vim:tw=71:sw=4:ts=4:expandtab |