keyboard/altgr: expected greek alphabet transliteration

[sheet.git] / keyboard / altgr / spacecadet.eng.inc.pl

diff --git a/keyboard/altgr/spacecadet.eng.inc.pl b/keyboard/altgr/spacecadet.eng.inc.pl
index 75e2948b3a9f9215d4df343823c35eb748d1d37e..12c2fbeea51b26c898a20050326757922fe51089 100644 (file)
--- a/keyboard/altgr/spacecadet.eng.inc.pl
+++ b/keyboard/altgr/spacecadet.eng.inc.pl
@@ -89,9 +89,14 @@ my %rows = (
        '+/' => '∫',
 );
 
+my $groups = kbchars(\%rows);
+$rows{$_} =~ /\A\p{Greek}/ and $groups->{def}{''}{$_} =~ s/g6/g5/ for map {"+$_"} 'a'..'z';
+$groups->{flag}{g4} = ['similar', 'transliterates or transcribes an expected letter'];
+$groups->{flag}{g5} = ['greek', 'different Greek letters or symbols'];
+
 +{
-       %{ kbchars(\%rows) },
-       version => '1.0',
+       %{$groups},
+       version => '1.1',
        title => 'Space Cadet',
        category => 'legacy',
        intro => join("\n",