X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/b13bb406f89eaebf04c8fd8ffe69cde30d5aa0bd..f4377fa7ab32ce088460551744de22bab93515dc:/keyboard/altgr/olpc.eng.inc.pl diff --git a/keyboard/altgr/olpc.eng.inc.pl b/keyboard/altgr/olpc.eng.inc.pl index 3d72e36..e67d8e7 100644 --- a/keyboard/altgr/olpc.eng.inc.pl +++ b/keyboard/altgr/olpc.eng.inc.pl @@ -64,11 +64,10 @@ my %shift = ( qw( { [ } ] " ' | \ < , > . ? / ` 3 ~ = ), (map {uc, lc} qw[ r t y u i o p h j m ]), ); -$rows{$_} = $rows{ $shift{$_} } for keys %shift; # alias shifted +$rows{$_} = \$shift{$_} for keys %shift; # alias shifted my $groups = kbchars(\%rows); $groups->{flag}{ext} = ['alias', 'identical results from unshifted key']; -$groups->{def}{''}{$_} .= ' ext' for keys %shift; # mark aliases +{ %{ $groups },