texlive[71973] Build/source/texk/web2c/pdftexdir:

[commits+karl at tug.org]

Revision: 71973
          https://tug.org/svn/texlive?view=revision&revision=71973
Author:   karl
Date:     2024-08-04 23:32:59 +0200 (Sun, 04 Aug 2024)
Log Message:
-----------
\pdfptexuseunderscore fix for sep vs. pdfkeyprefix, pdftex r935

Revision Links:
--------------
    https://tug.org/svn/texlive?view=revision&revision=935

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/pdftexdir/ChangeLog
    trunk/Build/source/texk/web2c/pdftexdir/pdftoepdf.cc

Modified: trunk/Build/source/texk/web2c/pdftexdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/pdftexdir/ChangeLog	2024-08-04 20:27:17 UTC (rev 71972)
+++ trunk/Build/source/texk/web2c/pdftexdir/ChangeLog	2024-08-04 21:32:59 UTC (rev 71973)
@@ -1,3 +1,7 @@
+2024-08-04  Thanh Han The  <hanthethanh at gmail.com>
+
+	* pdftoepdf.cc (write_epdf): reversed sep and pdfkeyprefix.
+
 2024-07-26  Andreas Scherer  <https://ascherer.github.io>
 
 	* pdftex.ch: Prepare for compilation with gcc-14.

Modified: trunk/Build/source/texk/web2c/pdftexdir/pdftoepdf.cc
===================================================================
--- trunk/Build/source/texk/web2c/pdftexdir/pdftoepdf.cc	2024-08-04 20:27:17 UTC (rev 71972)
+++ trunk/Build/source/texk/web2c/pdftexdir/pdftoepdf.cc	2024-08-04 21:32:59 UTC (rev 71973)
@@ -846,18 +846,18 @@
 
     // write additional information
     if ((suppress_ptex_info & MASK_SUPPRESS_PTEX_FILENAME) == 0) {
-        pdf_printf("/%s%sFileName (%s)\n", sep, pdfkeyprefix,
+        pdf_printf("/%s%sFileName (%s)\n", pdfkeyprefix, sep,
                    convertStringToPDFString(pdf_doc->file_name,
                                             strlen(pdf_doc->file_name)));
     }
     if ((suppress_ptex_info & MASK_SUPPRESS_PTEX_PAGENUMBER) == 0) {
-        pdf_printf("/%s%sPageNumber %i\n", sep, pdfkeyprefix, (int) epdf_selected_page);
+        pdf_printf("/%s%sPageNumber %i\n", pdfkeyprefix, sep, (int) epdf_selected_page);
     }
     if ((suppress_ptex_info & MASK_SUPPRESS_PTEX_INFODICT) == 0) {
         pdf_doc->doc->getDocInfoNF(&info);
         if (info.isRef()) {
             // the info dict must be indirect (PDF Ref p. 61)
-            pdf_printf("/%s%sInfoDict ", sep, pdfkeyprefix);
+            pdf_printf("/%s%sInfoDict ", pdfkeyprefix, sep);
             pdf_printf("%d 0 R\n", addOther(info.getRef()));
         }
     }