X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/98a8228ac6651509dfe58a871594b5cc22cee553..85a83b4022ac7b03549703185d32fb5b85047434:/keyboard/altgr/index.inc.pl diff --git a/keyboard/altgr/index.inc.pl b/keyboard/altgr/index.inc.pl index 5994d9f..6546b66 100644 --- a/keyboard/altgr/index.inc.pl +++ b/keyboard/altgr/index.inc.pl @@ -17,7 +17,7 @@ for my $name (map {@{$_}} values %cat) { $row{mode} //= {'' => undef}; - if ($keys->{def}{''}{'+a'}) { + if (($keys->{moderows} // '') =~ /^\d* [45] \d{2,}/x) { # move root +meta keys to distinct mode $row{mode}{"\e"} = '+'; /^\+./ and $keys->{def}{"\e"}{$_} = delete $keys->{def}{''}{$_} @@ -25,7 +25,8 @@ for my $name (map {@{$_}} values %cat) { } for my $mode (keys %{ $row{mode} }) { - $row{inventory}{$mode}{$_}++ for grep { /^g[2-9]/ } map { s/ (?!ext).*//r } map {$_->[0]} + $row{inventory}{$mode}{$_}++ + for grep { /^g[2-9]/ } map { s/ (?!ext).*//r } map {$_->[0]} values %{ $keys->{def}{$mode} }; } }