[latex3-commits] [git/LaTeX3-latex3-pdfresources] develop: add debug key (para, log) for Frank (3447811)

[Ulrike Fischer]

Repository : https://github.com/latex3/pdfresources
On branch  : develop
Link       : https://github.com/latex3/pdfresources/commit/344781100edc209f290dbf91f537de7fd913f008

>---------------------------------------------------------------

commit 344781100edc209f290dbf91f537de7fd913f008
Author: Ulrike Fischer <fischer at troubleshooting-tex.de>
Date:   Tue Jul 20 13:35:05 2021 +0200

    add debug key (para,log) for Frank


>---------------------------------------------------------------

344781100edc209f290dbf91f537de7fd913f008
 ltdocinit.dtx | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/ltdocinit.dtx b/ltdocinit.dtx
index f60c3bf..1ccd09b 100644
--- a/ltdocinit.dtx
+++ b/ltdocinit.dtx
@@ -129,6 +129,10 @@
 %    Currently the only value is |tagging|,
 %    which will do |\tagpdfsetup{activate,paratagging,interwordspace}|. It requires that
 %    \pkg{tagpdf} has been loaded first with the |testphase| key.
+%    \item[\texttt{debug}] This key activates some debug options. Currently only the
+%    keys |para| (with the default and only value |show|),
+%    and |log| (with the values of \pkg{tagpdf})
+%    are known.
 % \end{description}
 %
 % \subsection{Container for document properties}
@@ -404,6 +408,24 @@
             \AddToDocumentProperties [document]{tagging/interwordspace}{active}
           }
       }
+    ,debug .code:n =
+      {
+        \keys_set:nn { document / metadata / debug } {#1}
+      }
+    ,debug / para .code:n =
+      {
+        \AddToHook{package/after/tagpdf}
+          {
+            \tagpdfsetup{paratagging-show}
+          }
+      }
+    ,debug / log .code:n =
+      {
+        \AddToHook{package/after/tagpdf}
+          {
+            \tagpdfsetup{log=#1}
+          }
+      }
   }
 %    \end{macrocode}
 %    \begin{macrocode}