From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 20 May 2024 16:42:41 +0000 (+0200)
Subject: keyboard/altgr/index: keep meta as shift in root inventory
X-Git-Tag: v1.19~6
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/85a83b4022ac7b03549703185d32fb5b85047434?hp=0e222da060151bc6aa6d5c82962e5e15cfa12070

keyboard/altgr/index: keep meta as shift in root inventory

Reinclude second mode of spacecadet (without even uppercase) while filtering
out excessive unigraph &a as intended in v1.18-23-g159550a310 (2024-04-23)
[count root meta keys as distinct mode].
---

diff --git a/keyboard/altgr/index.inc.pl b/keyboard/altgr/index.inc.pl
index 6d4edb4..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}{''}{$_}