keyboard/altgr: proper function to convert char maps

[sheet.git] / keyboard / altgr / macos-abc.eng.inc.pl

diff --git a/keyboard/altgr/macos-abc.eng.inc.pl b/keyboard/altgr/macos-abc.eng.inc.pl
index 8e79740f4feb83d9e337d9d5a8b149964e704b4d..f4a4a0023d6c2192fb5a2c045e58e760594dba06 100644 (file)
--- a/keyboard/altgr/macos-abc.eng.inc.pl
+++ b/keyboard/altgr/macos-abc.eng.inc.pl
@@ -1,7 +1,9 @@
 use utf8;
 use strict;
 use warnings;
-our %rows = (
+do './keyboard/altgr/groups.inc.pl';
+
+my %rows = (
        'A' => "\N{MACRON}",
        'a' => "\N{COMBINING MACRON}",
        'B' => "\N{BREVE}",
@@ -181,7 +183,7 @@ our %rows = (
        '>b' => 'ɓ',
 );
 
-my $groups = do 'keyboard/altgr/groups.inc.pl';
+my $groups = kbchars(\%rows);
 $groups->{mode} = {
        ''  => 'option-shifted ⌥',
        ':' => '№ number prefix ⌥:',
@@ -200,7 +202,7 @@ $groups->{flag}->{g1} = ['mode' => "switch to an alternate set of keys"];
 +{
        %{$groups},
        version => '1.0',
-       title => 'abc option',
+       title => 'ABC option',
        intro => join("\n",
                'Resulting <a href="/unicode">selection</a> of <a href="/charset">Unicode</a> characters',
                "while pressing ⌥ Option (Alt) with Apple's ABC Extended",
@@ -213,4 +215,5 @@ $groups->{flag}->{g1} = ['mode' => "switch to an alternate set of keys"];
                "Apple ABC Extended keyboard layout table",
                "with the Option modifier key.",
        ],
+       image => 'keyboard/altgr/macbook-gray.jpg',
 }