[latex3-commits] [git/LaTeX3-latex3-pdfresources] verify: adapt hyperxmp-patch to new standard handling (dbc9fad)

[Ulrike Fischer]

Repository : https://github.com/latex3/pdfresources
On branch  : verify
Link       : https://github.com/latex3/pdfresources/commit/dbc9faddfe2c6e4d6ca176ea93260a093b551cd7

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

commit dbc9faddfe2c6e4d6ca176ea93260a093b551cd7
Author: Ulrike Fischer <fischer at troubleshooting-tex.de>
Date:   Fri Feb 19 11:49:26 2021 +0100

    adapt hyperxmp-patch to new standard handling


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

dbc9faddfe2c6e4d6ca176ea93260a093b551cd7
 firstaid/hyperxmp-patches-tmp-ltx.sty | 18 +++++++++++++++---
 1 file changed, 15 insertions(+), 3 deletions(-)

diff --git a/firstaid/hyperxmp-patches-tmp-ltx.sty b/firstaid/hyperxmp-patches-tmp-ltx.sty
index 5004d80..9aea560 100644
--- a/firstaid/hyperxmp-patches-tmp-ltx.sty
+++ b/firstaid/hyperxmp-patches-tmp-ltx.sty
@@ -45,8 +45,20 @@
     \pdfmanagement_add:nnx {Catalog} {Metadata}{\pdf_object_last:}
  }
 
+% A standard should be retrieved from the document settings.
+\cs_new:Npn \__hypxmp_get_Astandard:w #1-#2#3#4\q_stop
+ {
+   \tl_if_eq:nnT{#1}{A}
+    {
+      \Hy at pdfatrue
+      \tl_set:Nn \@pdfapart{#2}
+      \tl_set:Nn \@pdfaconformance{#3}
+    }
+ }
 \cs_new_protected:Npn \__hyxmp_get_metadata:
  {
+  \exp_last_unbraced:Ne \__hypxmp_get_Astandard:w
+    {\GetDocumentProperties{document/pdfstandard}}Z-ZZZ\q_stop
    \clist_map_inline:nn
     {
       % hyperxmp keys:
@@ -56,9 +68,9 @@
       ,pdfauthortitle
       ,pdfcaptionwriter
       ,pdfmetalang
-      ,pdfapart
-      ,pdfaconformance
-      ,pdfuapart
+      %,pdfapart %document
+      %,pdfaconformance %document
+      ,pdfuapart %probably document too but later ...
       ,pdfxstandard
       ,pdfsource
       ,pdfdocumentid