diff options
author | Norbert Preining <norbert@preining.info> | 2023-09-01 03:01:08 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2023-09-01 03:01:08 +0000 |
commit | a6340ee3ba0294ecd24259d39642d27d804187b2 (patch) | |
tree | cc82e5c3e6d1b796a6f2a530aea279ff238b556c /macros/latex/contrib/tagpdf/tagpdf-user.dtx | |
parent | 7cda3a1cc32bd43dab837e2b73046dab2aeaec98 (diff) |
CTAN sync 202309010301
Diffstat (limited to 'macros/latex/contrib/tagpdf/tagpdf-user.dtx')
-rw-r--r-- | macros/latex/contrib/tagpdf/tagpdf-user.dtx | 43 |
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> |