git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
index: latest git commit
[sheet.git]
/
tools
/
mkdigraphlist
diff --git
a/tools/mkdigraphlist
b/tools/mkdigraphlist
index fa67418a0aaf05c74433754934184f7e33387cfd..a1bfbcd05476d2bd77c6ee52365a1529d26256fd 100755
(executable)
--- a/
tools/mkdigraphlist
+++ b/
tools/mkdigraphlist
@@
-153,6
+153,7
@@
for my $row (values %info) {
# output perl code of hash
# (assume no backslashes or curlies, so we can just q{} w/o escaping)
# output perl code of hash
# (assume no backslashes or curlies, so we can just q{} w/o escaping)
+print "use utf8;\n";
print "+{\n";
printf '(map {$_=>0} qw{%s}),'."\n", join(' ',
map { substr($_, 1, 1).substr($_, 0, 1) } sort keys %di
print "+{\n";
printf '(map {$_=>0} qw{%s}),'."\n", join(' ',
map { substr($_, 1, 1).substr($_, 0, 1) } sort keys %di