From 6b67724b21464f8bb8eec2a671c0a224a696b947 Mon Sep 17 00:00:00 2001
From: Sergey Matveev <stargrave@stargrave.org>
Date: Fri, 3 May 2024 11:46:07 +0300
Subject: [PATCH] Keep Producer

---
 bin/bin/my-ps2pdf | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/bin/bin/my-ps2pdf b/bin/bin/my-ps2pdf
index 4b18dc3..01e37bd 100755
--- a/bin/bin/my-ps2pdf
+++ b/bin/bin/my-ps2pdf
@@ -38,8 +38,9 @@ exiftool $1.pdf | while read l ; do
 done
 for i ({1..${#toremove}}) toremove[$i]=-${toremove[$i]}=
 exiftool -zip -overwrite_original -quiet \
-    -tagsFromFile $1 -Producer\>Creator \
-    ${=toremove} $1.pdf
+    -tagsFromFile $1 -Creator\<Producer $1.pdf
+exiftool -zip -overwrite_original -quiet \
+    -tagsFromFile $1 -Producer\>Creator ${=toremove} $1.pdf
 [[ -z $LINEARIZE ]] || LINEARIZE=--linearize
 qpdf $LINEARIZE --compress-streams=y $1.pdf $1.pdf.pdf
 mv $1.pdf.pdf $1.pdf
-- 
2.51.0