From 506425578f448433c8cbd8cf3805599f78fa1ebb Mon Sep 17 00:00:00 2001
From: John Whitington <john@coherentgraphics.co.uk>
Date: Wed, 1 Nov 2023 18:45:42 +0000
Subject: [PATCH] PDFE

---
 cpdfmetadata.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cpdfmetadata.ml b/cpdfmetadata.ml
index b685ca8..cbe6659 100644
--- a/cpdfmetadata.ml
+++ b/cpdfmetadata.ml
@@ -334,7 +334,7 @@ let determine_subformat pdf =
         let _, tree = xmltree_of_bytes metadata in
         flprint (string_of_xmltree tree);
           (* PDF/E *)
-          match get_data_for pdfaid "ISO_PDFEVersion" tree with
+          match get_data_for pdfe "ISO_PDFEVersion" tree with
           | Some s ->
               (* If also a pdfxid, print that in parentheses *)
               s