From 5f4bdebe887e0d75a9db49bd98631e8df78b015d Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Thu, 5 Mar 2015 07:29:34 +0100
Subject: [PATCH] chars: include plane 1 groups

---
 tools/mkfontinfo | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/mkfontinfo b/tools/mkfontinfo
index 85fa914..1019043 100755
--- a/tools/mkfontinfo
+++ b/tools/mkfontinfo
@@ -65,7 +65,7 @@ eval {
 
 eval {
 	use Unicode::UCD 'charinfo';
-	for my $code (0 .. 256**2) {
+	for my $code (0 .. 256**2*2) {
 		my $charinfo = charinfo($code) or next;
 		next if $charinfo->{category} =~ /^[MC]/;  # ignore Marks and "other" Control chars
 		push @{ $charlist{$_}->{ $charinfo->{$_} } }, chr $code
-- 
2.30.0