keyboard/altgr/index: strip mode links from sample keys again
authorMischa POSLAWSKY <perl@shiar.org>
Tue, 7 May 2024 17:06:27 +0000 (19:06 +0200)
committerMischa POSLAWSKY <perl@shiar.org>
Mon, 20 May 2024 23:03:09 +0000 (01:03 +0200)
Broken since commit v1.18-21-gc4ca0bd3e9 (2024-04-23)
[keyboard: recombine translations in include syntax].

keyboard/altgr/index.inc.plp

index a74e01228f8eee098bba96f289779b35f494c104..67249ec302e5a5816e71bbb2cd94be1d4c6fe71e 100644 (file)
@@ -177,8 +177,12 @@ for my $inc (@incs) {
                        my $keydata = Data("$dirbase/$inc.eng");
                        Shiar_Sheet::Keyboard->new($keydata)
                }) {
                        my $keydata = Data("$dirbase/$inc.eng");
                        Shiar_Sheet::Keyboard->new($keydata)
                }) {
-                       $keys->print_key('', $_, ($keys->{def}{''}{$_} // ['ni']) =~ s/ mode\S*//r)
-                               for @sample;
+                       for my $c (@sample) {
+                               my $def = $keys->{def}{''}{$c} // [];
+                               $def->[0] //= 'ni';
+                               $def->[0] =~ s/ mode\S*//;
+                               $keys->print_key('', $c, $def);
+                       }
                }
                say '</tr>';
        }
                }
                say '</tr>';
        }