git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
keyboard/altgr: proper function to convert char maps
[sheet.git]
/
keyboard
/
altgr
/
eurkey.eng.inc.pl
diff --git
a/keyboard/altgr/eurkey.eng.inc.pl
b/keyboard/altgr/eurkey.eng.inc.pl
index cc820e74d2aef1eadbcb9e527cc55c0a584efcbe..b2a98cbc0f422076954109a1891e7a73b4e000a2 100644
(file)
--- a/
keyboard/altgr/eurkey.eng.inc.pl
+++ b/
keyboard/altgr/eurkey.eng.inc.pl
@@
-1,6
+1,7
@@
use utf8;
use strict;
use warnings;
use utf8;
use strict;
use warnings;
+do './keyboard/altgr/groups.inc.pl';
my $V = v1.3;
my $V = v1.3;
@@
-26,7
+27,7
@@
my %arrows = (
'+' => '⇔',
);
'+' => '⇔',
);
-
our
%rows = (
+
my
%rows = (
'1' => '¡',
'!' => '¹',
'2' => 'ª',
'1' => '¡',
'!' => '¹',
'2' => 'ª',
@@
-265,7
+266,7
@@
our %rows = (
(map { ($presymbol.$_ => $arrows{$_}) } keys %arrows),
);
(map { ($presymbol.$_ => $arrows{$_}) } keys %arrows),
);
-my $groups =
do 'keyboard/altgr/groups.inc.pl'
;
+my $groups =
kbchars(\%rows)
;
$groups->{mode} = {
'' => 'option-shifted ⌥',
'm' => 'Ω greek prefix ⌥m',
$groups->{mode} = {
'' => 'option-shifted ⌥',
'm' => 'Ω greek prefix ⌥m',