texlive[58133] Build/source/texk/dvipdfm-x: avoid unnecessary

[commits+kakuto at tug.org]

Revision: 58133
          http://tug.org/svn/texlive?view=revision&revision=58133
Author:   kakuto
Date:     2021-03-05 00:00:45 +0100 (Fri, 05 Mar 2021)
Log Message:
-----------
avoid unnecessary warnings

Modified Paths:
--------------
    trunk/Build/source/texk/dvipdfm-x/ChangeLog
    trunk/Build/source/texk/dvipdfm-x/pdfdev.c
    trunk/Build/source/texk/dvipdfm-x/pdffont.c

Modified: trunk/Build/source/texk/dvipdfm-x/ChangeLog
===================================================================
--- trunk/Build/source/texk/dvipdfm-x/ChangeLog	2021-03-04 22:26:49 UTC (rev 58132)
+++ trunk/Build/source/texk/dvipdfm-x/ChangeLog	2021-03-04 23:00:45 UTC (rev 58133)
@@ -1,3 +1,9 @@
+2021-03-05  Akira Kakuto  <kakuto at w32tex.org>
+
+	* pdfdev.c: Correct the incomplete fix on 2021-03-04.
+	* pdffont.c: Avoid unnecessary warnings, reported in
+	https://tug.org/pipermail/dvipdfmx/2021-March/000242.html
+
 2021-03-04  Akira Kakuto  <kakuto at w32tex.org>
 
 	* pdfdev.c: Fix to call mktexpk with correct arguments when

Modified: trunk/Build/source/texk/dvipdfm-x/pdfdev.c
===================================================================
--- trunk/Build/source/texk/dvipdfm-x/pdfdev.c	2021-03-04 22:26:49 UTC (rev 58132)
+++ trunk/Build/source/texk/dvipdfm-x/pdfdev.c	2021-03-04 23:00:45 UTC (rev 58133)
@@ -1243,22 +1243,11 @@
 static void
 print_fontmap (const char *font_name, fontmap_rec *mrec)
 {
-  char *p;
   if (!mrec)
     return;
 
   MESG("\n");
 
-/*
-  The extension ".pfb" is not needed for type1 fonts.
-  And the extension ".pfb" prohibits to call mktexpk with right
-  arguments when pdftex.map is used and when type1 is not found.
-  Thus we discard the extension ".pfb". 
-*/
-  p = strrchr(mrec->font_name, '.');
-  if (p && strcasecmp(p, ".pfb") == 0)
-    *p = '\0';
-
   MESG("fontmap: %s -> %s", font_name, mrec->font_name);
   if (mrec->enc_name)
     MESG("(%s)",  mrec->enc_name);
@@ -1301,6 +1290,7 @@
 int
 pdf_dev_locate_font (const char *font_name, spt_t ptsize)
 {
+  char            *pp;
   pdf_dev         *p = current_device();
   int              i;
   fontmap_rec     *mrec;
@@ -1334,6 +1324,15 @@
 
   /* New font */
   mrec = pdf_lookup_fontmap_record(font_name);
+/*
+  The extension ".pfb" is not needed for type1 fonts.
+  And the extension ".pfb" prohibits to call mktexpk with right
+  arguments when pdftex.map is used and when type1 is not found.
+  Thus we discard the extension ".pfb". 
+*/
+  pp = strrchr(mrec->font_name, '.');
+  if (pp && strcasecmp(pp, ".pfb") == 0)
+    *pp = '\0';
 
   if (dpx_conf.verbose_level > 1)
     print_fontmap(font_name, mrec);

Modified: trunk/Build/source/texk/dvipdfm-x/pdffont.c
===================================================================
--- trunk/Build/source/texk/dvipdfm-x/pdffont.c	2021-03-04 22:26:49 UTC (rev 58132)
+++ trunk/Build/source/texk/dvipdfm-x/pdffont.c	2021-03-04 23:00:45 UTC (rev 58133)
@@ -591,6 +591,7 @@
     if ((font->flags & PDF_FONT_FLAG_IS_ALIAS) ||
         (font->flags & PDF_FONT_FLAG_IS_REENCODE) ||
         !font->reference) {
+      pdf_flush_font(font);
       pdf_clean_font_struct(font);
       continue;
     }