charset: extend inheritance to generic metadata hashes

[sheet.git] / tools / mkfontinfo

diff --git a/tools/mkfontinfo b/tools/mkfontinfo
index cdd508d3cd5a5cf300474d9ac73a8aba85282809..de0bbf12365478ac4820fe722e805c42c5ed967d 100755 (executable)
--- a/tools/mkfontinfo
+++ b/tools/mkfontinfo
@@ -1,6 +1,5 @@
 #!/usr/bin/env perl
-use 5.010;
-use strict;
+use 5.014;
 use warnings;
 use utf8;
 
@@ -30,6 +29,8 @@ for my $fontfile (glob 'ttfsupport/*'.$incsuffix) {
 
 my %charlist;
 
+$charlist{table}->{abc} = ['A'..'Z', 'a'..'z'];
+
 my $chartables = do 'unicode-table.inc.pl' or warn $@ || $!;
 if ($chartables) {
        while (my ($tablegroup, $grouprow) = each %{$chartables}) {