X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/696a8536a4d0407116c0d587433b11b80a28a15a..9ab0df43bbb8c43a31403d7e6810588e9de08da3:/tools/mkxkbsymbols diff --git a/tools/mkxkbsymbols b/tools/mkxkbsymbols index 52aa8a9..e48fb35 100755 --- 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} } ); }