From 8b9628a6ce655ac1a3883973ae993ae431cd6641 Mon Sep 17 00:00:00 2001 From: Luigi Scarso Date: Wed, 30 Jan 2019 16:52:38 +0000 Subject: udpated luatex 1.09.2 git-svn-id: svn://tug.org/texlive/trunk@49872 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/luatexdir/lua/lpdflib.c | 16 ++++++++++++++++ Build/source/texk/web2c/luatexdir/luatex_svnversion.h | 2 +- 2 files changed, 17 insertions(+), 1 deletion(-) (limited to 'Build/source/texk/web2c/luatexdir') diff --git a/Build/source/texk/web2c/luatexdir/lua/lpdflib.c b/Build/source/texk/web2c/luatexdir/lua/lpdflib.c index 669fa1f2fbc..6396baa92cc 100644 --- a/Build/source/texk/web2c/luatexdir/lua/lpdflib.c +++ b/Build/source/texk/web2c/luatexdir/lua/lpdflib.c @@ -808,6 +808,12 @@ static int getpdfomitcidset(lua_State * L) return 1 ; } +static int getpdfomitcharset(lua_State * L) +{ + lua_pushinteger(L, (pdf_omit_charset)); + return 1 ; +} + static int setpdfgentounicode(lua_State * L) { if (lua_type(L, 1) == LUA_TNUMBER) { @@ -824,6 +830,14 @@ static int setpdfomitcidset(lua_State * L) return 0 ; } +static int setpdfomitcharset(lua_State * L) +{ + if (lua_type(L, 1) == LUA_TNUMBER) { + set_pdf_omit_charset(lua_tointeger(L, 1)); + } + return 0 ; +} + /* for tracing purposes when no pages are flushed */ static int setforcefile(lua_State * L) @@ -1335,10 +1349,12 @@ static const struct luaL_Reg pdflib[] = { { "getignoreunknownimages", getpdfignoreunknownimages }, { "getgentounicode", getpdfgentounicode }, { "getomitcidset", getpdfomitcidset }, + { "getomitcharset", getpdfomitcharset }, { "setinclusionerrorlevel", setpdfinclusionerrorlevel }, { "setignoreunknownimages", setpdfignoreunknownimages }, { "setgentounicode", setpdfgentounicode }, { "setomitcidset", setpdfomitcidset }, + { "setomitcharset", setpdfomitcharset }, { "setforcefile", setforcefile }, { "mapfile", l_mapfile }, { "mapline", l_mapline }, diff --git a/Build/source/texk/web2c/luatexdir/luatex_svnversion.h b/Build/source/texk/web2c/luatexdir/luatex_svnversion.h index 63808095987..67b691c3776 100644 --- a/Build/source/texk/web2c/luatexdir/luatex_svnversion.h +++ b/Build/source/texk/web2c/luatexdir/luatex_svnversion.h @@ -1 +1 @@ -#define luatex_svn_revision 7070 +#define luatex_svn_revision 7075 -- cgit v1.2.3