diff options
| author | Patrick McDermott <patrick.mcdermott@libiquity.com> | 2019-07-15 00:20:43 (EDT) |
|---|---|---|
| committer | Patrick McDermott <patrick.mcdermott@libiquity.com> | 2019-07-15 00:20:43 (EDT) |
| commit | 399e34880a88caf1710878067d7a316aa4d67279 (patch) | |
| tree | a19229c27834256326cea83494d212ac9b3f8bee | |
| parent | 323a860325a9768737683ac7c594f8e95bb76e70 (diff) | |
scripts/gen-mplus-patch.pl: Fix odd Perl error
Can't use string ("mplus-1m-regular") as an ARRAY ref while "strict refs" in use at scripts/gen-mplus-patch.pl line 196.
| -rwxr-xr-x | scripts/gen-mplus-patch.pl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/scripts/gen-mplus-patch.pl b/scripts/gen-mplus-patch.pl index ffdd263..33e452a 100755 --- a/scripts/gen-mplus-patch.pl +++ b/scripts/gen-mplus-patch.pl @@ -216,13 +216,14 @@ sub conv_fonts my $weight; my $width; my $height; + my $font_name; my $new; $patch = ''; foreach my $font (@FONTS) { ($face, $weight, $width, $height) = @$font; - $font = "mplus-$face-$weight"; - $new = `otf2bdf -p $width -r 72 $mplus_dir/$font.ttf | \\ - $bdf2fbcon -o - -n $font -p 2 -`; + $font_name = "mplus-$face-$weight"; + $new = `otf2bdf -p $width -r 72 $mplus_dir/$font_name.ttf | \\ + $bdf2fbcon -o - -n $font_name -p 2 -`; $patch .= make_patch("lib/fonts/font_mplus_${face}_${weight}_" . "${width}x${height}.c", '', $new); } |