keyboard/altgr/index: hide mode and identical keys in inventory

diff --git a/keyboard/altgr/index.inc.plp b/keyboard/altgr/index.inc.plp
index c47bfeb1c67d19dc53b03ce713f58dc610c69bae..d4d8bdeabb5c7b200fe6962ff03beb9a92bfb58d 100644 (file)
--- a/keyboard/altgr/index.inc.plp
+++ b/keyboard/altgr/index.inc.plp
@@ -147,7 +147,8 @@ for my $inc (sort {
                my $keys = Shiar_Sheet::Keyboard->new($table);
                for my $mode ($keys->{mode} ? sort keys %{ $keys->{mode} } : '') {
                        my %inventory;
-                       $inventory{ s/ (?!ext).*//r }++ for values %{ $keys->{def}{$mode} };
+                       $inventory{$_}++ for grep { /^g[2-9]/ } map { s/ (?!ext).*//r }
+                               values %{ $keys->{def}{$mode} };
                        print '<span class=graph>';
                        print "<label>$_</label>" for $keys->{key}{$mode} =~ s/\s.*//r || ();
                        for my $g (sort keys %inventory) {