From: Mischa POSLAWSKY <perl@shiar.org>
Date: Thu, 14 Mar 2024 23:03:42 +0000 (+0100)
Subject: keyboard/altgr/eurkey: greek uppercase
X-Git-Tag: v1.19~34
X-Git-Url: http://git.shiar.net/sheet.git/commitdiff_plain/9161aea80d5aa138281ec4fbcc6f0434739d7866

keyboard/altgr/eurkey: greek uppercase

Overlooked from less explicit reference sheet.
---

diff --git a/keyboard/altgr/eurkey.eng.inc.pl b/keyboard/altgr/eurkey.eng.inc.pl
index ac79027..456ac15 100644
--- a/keyboard/altgr/eurkey.eng.inc.pl
+++ b/keyboard/altgr/eurkey.eng.inc.pl
@@ -135,7 +135,9 @@ my %rows = (
 
 		# aliases
 		'v' => \'mb',
+		'V' => \'mB',
 		'u' => \'mq',
+		'U' => \'mQ',
 
 		# suþscript
 		'1' => '¹',
@@ -273,6 +275,9 @@ my %rows = (
 	},
 );
 
+# uppercase greek
+$rows{m}{uc $_} //= uc $rows{m}{$_} for keys %{ $rows{m} };
+
 +{
 	%{ kbmodes(\%rows) },
 	mode => {
@@ -281,7 +286,7 @@ my %rows = (
 		'M' => '√ maths prefix ⌥M',
 		$presymbol => "$rows{''}{$presymbol} symbol prefix ⌥$presymbol",
 	},
-	version => '1.1',
+	version => '1.2',
 	title => 'EurKEY',
 	category => 'latin/thirdparty/xorg',
 	intro => join("\n",