[groff] 01/02: Foundries are only a single letter.

[Deri James]

deri pushed a commit to branch master
in repository groff.

commit 8e19b5a45454b17196333025259facfc7dce56fd
Author: Deri James <deri@chuzzlewit.myzen.co.uk>
AuthorDate: Fri Oct 18 19:19:42 2024 +0100

    Foundries are only a single letter.
    
    * src/devices/gropdf/gropdf.pl: Look for single letter
    followed by '-'.
---
 src/devices/gropdf/gropdf.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/devices/gropdf/gropdf.pl b/src/devices/gropdf/gropdf.pl
index 05ea97866..45408ee55 100644
--- a/src/devices/gropdf/gropdf.pl
+++ b/src/devices/gropdf/gropdf.pl
@@ -3390,7 +3390,7 @@ sub LoadFont
     Die("unable to open font '$ofontnm' for mounting") if !defined($f);
 
     my $foundry='';
-    $foundry=$1 if $fontnm=~m/^(.*?)-/;
+    $foundry=$1 if $fontnm=~m/^(.)-/;
     my $stg=1;
     my %fnt;
     my @fntbbox=(0,0,0,0);