X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/c4ca0bd3e94a7978772dadaa3b941ecc84741407..98a8228ac6651509dfe58a871594b5cc22cee553:/keyboard/altgr/index.inc.plp diff --git a/keyboard/altgr/index.inc.plp b/keyboard/altgr/index.inc.plp index e9179c6..fd36e60 100644 --- a/keyboard/altgr/index.inc.plp +++ b/keyboard/altgr/index.inc.plp @@ -8,7 +8,7 @@ my $indexfile = "$dirbase/index"; Html({ title => "altgr keyboard cheat sheets", - version => '1.2', + version => '1.3', description => [ "Overview of alternate keyboard modes,", "offering extended Unicode characters if a modifier key", @@ -157,7 +157,7 @@ for my $inc (@incs) { print '', "\n\t"; for my $mode ($table->{mode} ? sort keys %{ $table->{mode} } : '') { print ''; - printf '', s/\s.*//r for $table->{def}{''}{$mode}[1] || (); + printf "", m/^(\S*)/ for $mode && $table->{mode}{$mode} || (); for my $g (sort keys %{ $table->{inventory}{$mode} }) { printf ' %s', $g, $_/$most*100, $_,