keyboard/altgr: omit unaltered keys

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

diff --git a/keyboard/altgr/windows.eng.inc.pl b/keyboard/altgr/windows.eng.inc.pl
index 3b68cf74ce666879915315106b59fd6f080980b9..993ea3329c8a7c91bb9bace54fd250b54dbf421e 100644 (file)
--- a/keyboard/altgr/windows.eng.inc.pl
+++ b/keyboard/altgr/windows.eng.inc.pl
@@ -7,13 +7,14 @@ my @letters = qw(
        á b © ð é f g h í j œ ø µ ñ ó ö ä ® ß þ ú v å x ü æ
 );
 our %rows = map {
-       $az[$_] => $letters[$_]
+       ($az[$_] eq $letters[$_]) ? () :
+       ($az[$_] => $letters[$_])
 } 0 .. $#az;
 
 +{
        %{ do 'keyboard/altgr/groups.inc.pl' },
        title => 'altgr',
-       version => '1.2',
+       version => '1.3',
        intro => join("\n",
                'Special <a href="/unicode">characters</a> returned with the AltGr modifier',
                'for the Windows US international layout.',