'>b' => 'ɓ',
);
-my $groups = do 'keyboard/altgr/groups.inc.pl';
+my $groups = do './keyboard/altgr/groups.inc.pl';
$groups->{mode} = {
'' => 'option-shifted ⌥',
':' => '№ number prefix ⌥:',
} 0 .. $#az
);
-my $groups = do 'keyboard/altgr/groups.inc.pl';
+my $groups = do './keyboard/altgr/groups.inc.pl';
$groups->{def}{''}{$_} .= ' ext' for keys %xkb;
$groups->{flag}{ext} = ['xkb', 'unofficial extensions added in Linux (Gnome, KDE)'];
1;
} or warn "Failed reading unicode tables: $@";
+eval {
+ do './keyboard/altgr/macos-abc.eng.inc.pl' or die $@ || $!;
+ our %rows;
+ $info{$_} //= {} for values %rows;
+ 1;
+} or warn "Failed reading additional keyboard map: $@";
+
eval {
require HTML::Entities;
our %char2entity;