git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
perl: deobfuscate the year of v5.8 stability end
[sheet.git]
/
tools
/
mkxkbsymbols
diff --git
a/tools/mkxkbsymbols
b/tools/mkxkbsymbols
index 52aa8a9f47cb56de4c2738f25b0410bf335da21b..e48fb35120cf52d7e26cad692ca1e655d18f62c5 100755
(executable)
--- a/
tools/mkxkbsymbols
+++ b/
tools/mkxkbsymbols
@@
-38,7
+38,7
@@
xkb_symbols "$name" {
for my $k (sort keys %{$geochar}) {
printf "\tkey <%s> {[%s]};\n", $k, join(', ',
map { !$_ ? 'NoSymbol' : sprintf 'U%04X', ord }
- map { $info->{
key}->{$_}
} @{ $geochar->{$k} }
+ map { $info->{
def}{''}->{$_}[1]
} @{ $geochar->{$k} }
);
}