summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/tagpdf/tagpdf-backend.dtx
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2024-01-20 03:01:12 +0000
committerNorbert Preining <norbert@preining.info>2024-01-20 03:01:12 +0000
commit2fd07558ccd8d3c8e354f8ea0b342ef7ac1e87a3 (patch)
treedfa08a4c648cc5f7b4c8e5a55fcae40546d96d7d /macros/latex/contrib/tagpdf/tagpdf-backend.dtx
parent849336321485cc972b028c23f8276fa6bdf4818e (diff)
CTAN sync 202401200301
Diffstat (limited to 'macros/latex/contrib/tagpdf/tagpdf-backend.dtx')
-rw-r--r--macros/latex/contrib/tagpdf/tagpdf-backend.dtx17
1 files changed, 10 insertions, 7 deletions
diff --git a/macros/latex/contrib/tagpdf/tagpdf-backend.dtx b/macros/latex/contrib/tagpdf/tagpdf-backend.dtx
index a257c70058..8a6554e31b 100644
--- a/macros/latex/contrib/tagpdf/tagpdf-backend.dtx
+++ b/macros/latex/contrib/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}