summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/tagpdf/tagpdf-user.dtx
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2023-09-01 03:01:08 +0000
committerNorbert Preining <norbert@preining.info>2023-09-01 03:01:08 +0000
commita6340ee3ba0294ecd24259d39642d27d804187b2 (patch)
treecc82e5c3e6d1b796a6f2a530aea279ff238b556c /macros/latex/contrib/tagpdf/tagpdf-user.dtx
parent7cda3a1cc32bd43dab837e2b73046dab2aeaec98 (diff)
CTAN sync 202309010301
Diffstat (limited to 'macros/latex/contrib/tagpdf/tagpdf-user.dtx')
-rw-r--r--macros/latex/contrib/tagpdf/tagpdf-user.dtx43
1 files changed, 40 insertions, 3 deletions
diff --git a/macros/latex/contrib/tagpdf/tagpdf-user.dtx b/macros/latex/contrib/tagpdf/tagpdf-user.dtx
index 50afdf6a77..518a341812 100644
--- a/macros/latex/contrib/tagpdf/tagpdf-user.dtx
+++ b/macros/latex/contrib/tagpdf/tagpdf-user.dtx
@@ -46,7 +46,7 @@
% }^^A
% }
%
-% \date{Version 0.98k, released 2023-08-04}
+% \date{Version 0.98l, released 2023-08-30}
% \maketitle
% \begin{documentation}
% \section{Setup commands}
@@ -250,7 +250,7 @@
% \begin{macrocode}
%<@@=tag>
%<*header>
-\ProvidesExplPackage {tagpdf-user} {2023-08-04} {0.98k}
+\ProvidesExplPackage {tagpdf-user} {2023-08-30} {0.98l}
{tagpdf - user commands}
%</header>
% \end{macrocode}
@@ -508,6 +508,44 @@
,struct-stack / show .code:n = \seq_show:N \g_@@_struct_tag_stack_seq
,struct-stack .default:n = show
}
+%</package>
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{debug/structures (show-key)}
+% The following key is available only if the tagpdf-debug package is loaded
+% and shows all structures starting with the one with the number
+% given by the key.
+% \begin{macrocode}
+%<*debug>
+\keys_define:nn { @@ / show }
+ {
+ ,debug/structures .code:n =
+ {
+ \int_step_inline:nnn{#1}{\c@g__tag_struct_abs_int}
+ {
+ \msg_term:nnxxxx
+ { tag/debug } { show-struct }
+ { ##1 }
+ {
+ \prop_map_function:cN
+ {g_@@_struct_debug_##1_prop}
+ \msg_show_item_unbraced:nn
+ }
+ { } { }
+ \msg_term:nnxxxx
+ { tag/debug } { show-kids }
+ { ##1 }
+ {
+ \seq_map_function:cN
+ {g_@@_struct_debug_kids_##1_seq}
+ \msg_show_item_unbraced:n
+ }
+ { } { }
+ }
+ }
+ ,debug/structures .default:n = 0
+ }
+%</debug>
% \end{macrocode}
% \end{macro}
%
@@ -522,7 +560,6 @@
% Until l3ref is in the kernel, we provide a definition for \cs{newlabeldata} in
% the aux-file to avoid errors if a document switches between tagging and non-tagging.
% \begin{macrocode}
-%</package>
%<base>\AddToHook{begindocument}
%<base> {\immediate\write\@mainaux{\string\providecommand\string\newlabeldata[2]{}}}
%<*package>