X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/da56f674f1b9ed64adbcae060113733b023fa5c9..ffe0197700e02f9aaf7c36a377e82a2cc325db93:/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}{''} };
 	}