[latex3-commits] [git/LaTeX3-latex3-pdfresources] verify: use uppercase for standard to allow fold casing and simplify hperxmp (6c38af8)

[Ulrike Fischer]

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

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

commit 6c38af8952ab3e03ce846e834e5bf35f0bc19824
Author: Ulrike Fischer <fischer at troubleshooting-tex.de>
Date:   Fri Feb 19 13:45:54 2021 +0100

    use uppercase for standard to allow fold casing and simplify hperxmp


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

6c38af8952ab3e03ce846e834e5bf35f0bc19824
 firstaid/hyperxmp-patches-tmp-ltx.sty |  2 +-
 l3pdfmeta.dtx                         | 36 +++++++++++++++++------------------
 ltdocinit.dtx                         | 11 ++++++++---
 3 files changed, 27 insertions(+), 22 deletions(-)

diff --git a/firstaid/hyperxmp-patches-tmp-ltx.sty b/firstaid/hyperxmp-patches-tmp-ltx.sty
index 9aea560..7a29c59 100644
--- a/firstaid/hyperxmp-patches-tmp-ltx.sty
+++ b/firstaid/hyperxmp-patches-tmp-ltx.sty
@@ -52,7 +52,7 @@
     {
       \Hy at pdfatrue
       \tl_set:Nn \@pdfapart{#2}
-      \tl_set:Nn \@pdfaconformance{#3}
+      \tl_set:Nx \@pdfaconformance{#3}
     }
  }
 \cs_new_protected:Npn \__hyxmp_get_metadata:
diff --git a/l3pdfmeta.dtx b/l3pdfmeta.dtx
index d182863..f197b37 100644
--- a/l3pdfmeta.dtx
+++ b/l3pdfmeta.dtx
@@ -494,15 +494,15 @@
 %  Some note about requirements for more standard can
 %  be found in info/pdfstandard.tex.
 %  \begin{variable}{
-%   \g_@@_standard_pdf/A-1b_prop ,
-%   \g_@@_standard_pdf/A-2b_prop ,
-%   \g_@@_standard_pdf/A-3b_prop
+%   \g_@@_standard_pdf/A-1B_prop ,
+%   \g_@@_standard_pdf/A-2B_prop ,
+%   \g_@@_standard_pdf/A-3B_prop
 %   }
 %     \begin{macrocode}
-\prop_new:c { g_@@_standard_pdf/A-1b_prop }
-\prop_set_from_keyval:cn { g_@@_standard_pdf/A-1b_prop }
+\prop_new:c { g_@@_standard_pdf/A-1B_prop }
+\prop_set_from_keyval:cn { g_@@_standard_pdf/A-1B_prop }
   {
-    ,name             = pdf/A-1b
+    ,name             = pdf/A-1B
     ,type             = A
     ,year             = 2005
     ,min_pdf_version  = 1.4        %minimum
@@ -555,31 +555,31 @@
   }
 
 %A-2b ==============
-\prop_new:c { g_@@_standard_pdf/A-2b_prop }
+\prop_new:c { g_@@_standard_pdf/A-2B_prop }
 \prop_gset_eq:cc
-  { g_@@_standard_pdf/A-2b_prop }
-  { g_@@_standard_pdf/A-1b_prop }
+  { g_@@_standard_pdf/A-2B_prop }
+  { g_@@_standard_pdf/A-1B_prop }
 \prop_gput:cnn
-  { g_@@_standard_pdf/A-2b_prop }{name}{pdf/A-2b}
+  { g_@@_standard_pdf/A-2B_prop }{name}{pdf/A-2B}
 \prop_gput:cnn
-  { g_@@_standard_pdf/A-2b_prop }{year}{2011}
+  { g_@@_standard_pdf/A-2B_prop }{year}{2011}
 % embedding files is allowed (with restrictions)
 \prop_gremove:cn
-  { g_@@_standard_pdf/A-2b_prop }
+  { g_@@_standard_pdf/A-2B_prop }
   { embed_content}
 
 %A-3b ==============
-\prop_new:c { g_@@_standard_pdf/A-3b_prop }
+\prop_new:c { g_@@_standard_pdf/A-3B_prop }
 \prop_gset_eq:cc
-  { g_@@_standard_pdf/A-3b_prop }
-  { g_@@_standard_pdf/A-2b_prop }
+  { g_@@_standard_pdf/A-3B_prop }
+  { g_@@_standard_pdf/A-2B_prop }
 \prop_gput:cnn
-  { g_@@_standard_pdf/A-3b_prop }{name}{pdf/A-3b}
+  { g_@@_standard_pdf/A-3B_prop }{name}{pdf/A-3B}
 \prop_gput:cnn
-  { g_@@_standard_pdf/A-2b_prop }{year}{2012}
+  { g_@@_standard_pdf/A-2B_prop }{year}{2012}
 % embedding files is allowed (with restrictions)
 \prop_gremove:cn
-  { g_@@_standard_pdf/A-3b_prop }
+  { g_@@_standard_pdf/A-3B_prop }
   { embed_content}
 %    \end{macrocode}
 % \end{variable}
diff --git a/ltdocinit.dtx b/ltdocinit.dtx
index ffbb44b..23c7292 100644
--- a/ltdocinit.dtx
+++ b/ltdocinit.dtx
@@ -315,8 +315,13 @@
       }
     %,xmpmeta .bool_gset:N = \g_pdfmeta_xmp_bool %see pdfmeta unused and undefined for now!
     % this uses internal command from pdfmeta, it should probably move there ...
-    ,pdfstandard .choices:nn =
-      {A-1b,A-2b,A-3b}
+    ,pdfstandard .code:n =
+      {
+        \exp_args:Nnx
+        \keys_set:nn {document / metadata} {_pdfstandard=\str_uppercase:n{#1}}
+      }
+    ,_pdfstandard .choices:nn =
+      {A-1B,A-2B,A-3B}
       {
         \prop_if_exist:cT { g__pdfmeta_standard_pdf/#1_prop }
           {
@@ -324,7 +329,7 @@
           }
         \AddToDocumentProperties [document]{pdfstandard}{#1}
       }
-    ,pdfstandard / unknown .code:n =
+    ,_pdfstandard / unknown .code:n =
       {
         \msg_warning:nnn{pdf}{unknown-standard}{#1}
       }