[latex3-commits] [git/LaTeX3-latex3-pdfresources] rename-coredict: add catalog handler for show (0850293)

[Ulrike Fischer]

Repository : https://github.com/latex3/pdfresources
On branch  : rename-coredict
Link       : https://github.com/latex3/pdfresources/commit/0850293e1df4e118e654658b07a0d7255cd6342a

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

commit 0850293e1df4e118e654658b07a0d7255cd6342a
Author: Ulrike Fischer <fischer at troubleshooting-tex.de>
Date:   Sat Nov 28 21:11:18 2020 +0100

    add catalog handler for show


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

0850293e1df4e118e654658b07a0d7255cd6342a
 l3pdfmanagement.dtx | 37 +++++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)

diff --git a/l3pdfmanagement.dtx b/l3pdfmanagement.dtx
index cbcf6db..fe50158 100644
--- a/l3pdfmanagement.dtx
+++ b/l3pdfmanagement.dtx
@@ -1292,6 +1292,43 @@
   }
 %    \end{macrocode}
 % \end{macro}
+% \begin{macro}{@@_handler/Catalog/?_show:}
+% A handler to show the catalog.
+%    \begin{macrocode}
+\cs_new_protected:cpn {@@_handler/Catalog/?_show:}
+  {
+    \iow_term:x
+      {
+        \iow_newline:
+        The~Catalog~contains~in~the~top~level~the~single~value~entries
+        \prop_map_function:cN {\pdfdict_name:nn { g } { Core/Catalog }} \msg_show_item:nn
+      }
+    \clist_map_inline:Nn \c_@@_Catalog_seq_clist
+     {
+       \seq_if_empty:cF {  g_@@_/Catalog/##1_seq }
+         {
+           \iow_term:x
+             {
+               The~'##1'~array~contains~the~entries
+               \seq_map_function:cN { g_@@_/Catalog/AF_seq } \msg_show_item:n
+             }
+         }
+      }
+    \clist_map_inline:Nn \c_@@_Catalog_sub_clist
+      {
+        \prop_if_empty:cF { \pdfdict_name:nn { g } { Core/Catalog/##1 } }
+          {
+            \iow_term:x
+              {
+                The~Catalog~subdirectory~'##1'~contains~the~single~value~entries
+                \prop_map_function:cN {\pdfdict_name:nn { g } { Core/Catalog/##1 }} \msg_show_item:nn
+              }
+          }
+      }
+    \tl_show:x {\tl_to_str:n{\pdfmanagement_show:n{Catalog}}}
+  }
+%    \end{macrocode}
+% \end{macro}
 % \subsection{ xform / Properties }
 %    \begin{macrocode}
 \pdfdict_new:nn { g } {Core/Xform/Resources/Properties}