From 85a83b4022ac7b03549703185d32fb5b85047434 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 20 May 2024 18:42:41 +0200
Subject: [PATCH] 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].
---
 keyboard/altgr/index.inc.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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}{''}{$_}
-- 
2.30.0