X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/973451ff27debd3dcc2ccd4c9c26a08aceb39e4c..ada87baf9947ff8d17f0099f29011313c7fbff34:/keyboard/altgr/msx-graph.eng.inc.pl diff --git a/keyboard/altgr/msx-graph.eng.inc.pl b/keyboard/altgr/msx-graph.eng.inc.pl index 3bcf5d1..dd4a5b5 100644 --- a/keyboard/altgr/msx-graph.eng.inc.pl +++ b/keyboard/altgr/msx-graph.eng.inc.pl @@ -124,13 +124,13 @@ if (exists $get{compat}) { my $groups = kbchars(\%rows); # replace rare punctuation distinctions by symbols -$groups->{def}{''}{$_} =~ s/g[78]/g6/ for keys %rows; +$groups->{def}{''}{$_}[0] =~ s/g[78]/g6/ for keys %rows; -$groups->{def}{''}{$_} = 'g7' +$groups->{def}{''}{$_}[0] = 'g7' for grep { $rows{$_} =~ /[\x{2500}-\x{259F}]/ } keys %rows; $groups->{flag}{g7} = ['drawing', 'box drawing or block elements']; -$groups->{def}{''}{$_} = 'g8' for keys %compat; # mostly U+1FBxx +$groups->{def}{''}{$_}[0] = 'g8' for keys %compat; # mostly U+1FBxx $groups->{flag}{g8} = ['legacy', 'drawing symbols best represented by Unicode 13.0' . (exists $get{compat} && ', converted to compatible equivalents') @@ -140,12 +140,15 @@ $groups->{flag}{g8} = ['legacy', %{ $groups }, version => '1.0', title => 'MSX graph', - category => 'legacy/msx', + category => 'legacy/graph/msx', intro => join("\n", 'Resulting selection', 'of equivalent Unicode characters', "when the graph key is pressed on an MSX home computer", "(International model such as Toshiba HX10 or Phillips NMS 8245).", + 'Similar to PETSCII,', + 'ATASCII, and', + 'modern Unicode.', 'See also letters and symbols', "from pressing code.", ),