diff options
author | Karl Berry <karl@freefriends.org> | 2024-01-19 22:45:20 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2024-01-19 22:45:20 +0000 |
commit | 56430237cac93a24f0a22e43ddb409615e2611e9 (patch) | |
tree | 2b0659e102c9d76bb1b8baf9a421b02b3fff0923 /Master/texmf-dist/source/latex/tagpdf/tagpdf-backend.dtx | |
parent | 658373a9bbeff724374065a08da0268c19805a95 (diff) |
tagpdf (19jan24)
git-svn-id: svn://tug.org/texlive/trunk@69496 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/latex/tagpdf/tagpdf-backend.dtx')
-rw-r--r-- | Master/texmf-dist/source/latex/tagpdf/tagpdf-backend.dtx | 17 |
1 files changed, 10 insertions, 7 deletions
diff --git a/Master/texmf-dist/source/latex/tagpdf/tagpdf-backend.dtx b/Master/texmf-dist/source/latex/tagpdf/tagpdf-backend.dtx index a257c70058b..8a6554e31bc 100644 --- a/Master/texmf-dist/source/latex/tagpdf/tagpdf-backend.dtx +++ b/Master/texmf-dist/source/latex/tagpdf/tagpdf-backend.dtx @@ -2,7 +2,7 @@ % %% File: tagpdf-backend.dtx % -% Copyright (C) 2019-2023 Ulrike Fischer +% Copyright (C) 2019-2024 Ulrike Fischer % % It may be distributed and/or modified under the conditions of the % LaTeX Project Public License (LPPL), either version 1.3c of this @@ -47,13 +47,13 @@ % }^^A % } % -% \date{Version 0.98r, released 2023-12-18} +% \date{Version 0.98s, released 2024-01-19} % \maketitle % \begin{implementation} % \begin{macrocode} %<@@=tag> %<*luatex> -\ProvidesExplFile {tagpdf-luatex.def} {2023-12-18} {0.98r} +\ProvidesExplFile {tagpdf-luatex.def} {2024-01-19} {0.98s} {tagpdf~driver~for~luatex} % \end{macrocode} % \section{Loading the lua} @@ -158,8 +158,8 @@ local ProvidesLuaModule = { name = "tagpdf", - version = "0.98r", --TAGVERSION - date = "2023-12-18", --TAGDATE + version = "0.98s", --TAGVERSION + date = "2024-01-19", --TAGDATE description = "tagpdf lua code", license = "The LATEX Project Public License 1.3c" } @@ -754,6 +754,7 @@ local function @@_mark_spaces (head) local id = n.id if id == GLYPH then local glyph = n + default_currfontid = glyph.font if glyph.next and (glyph.next.id == GLUE) and not inside_math and (glyph.next.width >0) then @@ -790,8 +791,9 @@ local function @@_mark_spaces (head) if glyph.next and (glyph.next.id == GLUE) and not inside_math and (glyph.next.width >0) and n.subtype==0 then - nodesetattribute(glyph.next,iwspaceattributeid,1) - -- nodesetattribute(glyph.next,iwfontattributeid,glyph.font) + nodesetattribute(glyph.next,iwspaceattributeid,1) + -- changed 2024-01-18, issue #72 + nodesetattribute(glyph.next,iwfontattributeid,default_currfontid) -- for debugging if ltx.@@.trace.showspaces then @@_show_spacemark (head,glyph) @@ -838,6 +840,7 @@ ltx.@@.func.markspaceoff=@@_deactivate_mark_space % \begin{macrocode} local default_space_char = nodenew(GLYPH) local default_fontid = fontid("TU/lmr/m/n/10") +local default_currfontid = fontid("TU/lmr/m/n/10") default_space_char.char = 32 default_space_char.font = default_fontid % \end{macrocode} |