[groff] 23/35: [gropdf]: Revise error message on embed failure.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit 3de07cae944eb0ef4b06464de6e65802e778d110
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Mon Jun 20 15:15:26 2022 -0500

    [gropdf]: Revise error message on embed failure.
    
    * src/devices/gropdf/gropdf.pl (LoadFont): Revise error message when a
      font can't be found for embedding.  User failure to add an entry for
      locating the font file seems a more likely scenario than outright
      corruption of the file.
---
 ChangeLog                    |  7 +++++++
 src/devices/gropdf/gropdf.pl | 11 ++++++-----
 2 files changed, 13 insertions(+), 5 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 8be53262..2194267f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2022-06-20  G. Branden Robinson <g.branden.robinson@gmail.com>
+
+       * src/devices/gropdf/gropdf.pl (LoadFont): Revise error message
+       when a font can't be found for embedding.  User failure to add
+       an entry for locating the font file seems a more likely scenario
+       than outright corruption of the file.
+
 2022-06-20  G. Branden Robinson <g.branden.robinson@gmail.com>
 
        * src/roff/troff/env.cpp (font_change): Warn upon selection of a
diff --git a/src/devices/gropdf/gropdf.pl b/src/devices/gropdf/gropdf.pl
index 581f1fde..15888000 100644
--- a/src/devices/gropdf/gropdf.pl
+++ b/src/devices/gropdf/gropdf.pl
@@ -2506,11 +2506,12 @@ sub LoadFont
     }
     else
     {
-        Warn("unable to embed font file for '$fnt{internalname}'"
-            . " ($ofontnm) (corrupt 'download' file?)") if $embedall;
-        $fno=++$objct;
-        $fontlst{$fontno}->{OBJ}=BuildObj($objct,
-                        {'Type' => '/Font',
+       Warn("unable to embed font file for '$fnt{internalname}'"
+           . " ($ofontnm) (missing entry in 'download' file?)")
+           if $embedall;
+       $fno=++$objct;
+       $fontlst{$fontno}->{OBJ}=BuildObj($objct,
+                       {'Type' => '/Font',
                        'Subtype' => '/Type1',
                        'BaseFont' => '/'.$fnt{internalname},
                        'Widths' => $fnt{WIDTH},