summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog7
-rw-r--r--font/devpdf/util/BuildFoundries.pl4
2 files changed, 9 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index 59721ade0..22415226e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,12 @@
2022-06-10 Deri James <deri@chuzzlewit.myzen.co.uk>
+ [gropdf]: Correct display of pathnames used.
+
+ * font/devpdf/util/BuildFoundries.pl: Convert array to
+ string of pathnames.
+
+2022-06-10 Deri James <deri@chuzzlewit.myzen.co.uk>
+
[gropdf]: Fix to gropdf.
* src/devices/gropdf/gropdf.pl: If pdfbookmark was called
diff --git a/font/devpdf/util/BuildFoundries.pl b/font/devpdf/util/BuildFoundries.pl
index 9bf6fb0e3..76c1bef87 100644
--- a/font/devpdf/util/BuildFoundries.pl
+++ b/font/devpdf/util/BuildFoundries.pl
@@ -86,7 +86,7 @@ sub LoadFoundry
if (lc($r[0]) eq 'foundry')
{
- Warn("\nThe path(s) used for searching:\n".join(':',$foundrypath)."\n") if $notFoundFont;
+ Warn("\nThe path(s) used for searching:\n".join(':',@{$foundrypath})."\n") if $notFoundFont;
$foundry=uc($r[1]);
$foundrypath=[];
push(@{$foundrypath},$dirURW) if $dirURW;
@@ -166,7 +166,7 @@ sub LoadFoundry
}
close(F);
- Warn("\nThe path(s) used for searching:\n".join(':',$foundrypath)."\n") if $notFoundFont;
+ Warn("\nThe path(s) used for searching:\n".join(':',@{$foundrypath})."\n") if $notFoundFont;
}
sub RunAfmtodit