X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/ada87baf9947ff8d17f0099f29011313c7fbff34..HEAD:/keyboard/altgr/index.inc.pl diff --git a/keyboard/altgr/index.inc.pl b/keyboard/altgr/index.inc.pl index 1f77fa7..b864e13 100644 --- a/keyboard/altgr/index.inc.pl +++ b/keyboard/altgr/index.inc.pl @@ -18,10 +18,10 @@ for my $name (map {@{$_}} values %cat) { $row{mode} //= {'' => undef}; - if (($keys->{moderows} // '') =~ /^\d* [45] \d{2,}/x) { - # move root +meta keys to distinct mode + if (($keys->{moderows} // '') =~ /^\d* [3-9] \d{2,}/x) { + # move root ^ctrl or +meta keys to distinct mode $row{mode}{"\e"} = '+'; - /^\+./ and $keys->{def}{"\e"}{$_} = delete $keys->{def}{''}{$_} + /^[+^]./ and $keys->{def}{"\e"}{$_} = delete $keys->{def}{''}{$_} for keys %{ $keys->{def}{''} }; }