diff options
| author | Pablo Saratxaga <pablo@mandriva.com> | 2004-09-10 09:11:04 +0000 |
|---|---|---|
| committer | Pablo Saratxaga <pablo@mandriva.com> | 2004-09-10 09:11:04 +0000 |
| commit | f55275d7a259feb24f6209121344ab9d5e7702d1 (patch) | |
| tree | 2ddeda1e2a19e9975086158b80ec2a357bd0d57d /perl-install | |
| parent | 29dd33bcb73e8452806a9bef4a5f42246724783e (diff) | |
| download | drakx-f55275d7a259feb24f6209121344ab9d5e7702d1.tar drakx-f55275d7a259feb24f6209121344ab9d5e7702d1.tar.gz drakx-f55275d7a259feb24f6209121344ab9d5e7702d1.tar.bz2 drakx-f55275d7a259feb24f6209121344ab9d5e7702d1.tar.xz drakx-f55275d7a259feb24f6209121344ab9d5e7702d1.zip | |
fixed compose:rwin (it must be enabled if the key isn't used, and not
when the key is already used); and a new keyboard toggle
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/keyboard.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/perl-install/keyboard.pm b/perl-install/keyboard.pm index 2303eae82..0b927180e 100644 --- a/perl-install/keyboard.pm +++ b/perl-install/keyboard.pm @@ -227,8 +227,8 @@ arch() =~ /^sparc/ ? ( # aren't automatically enabled when typing in kana "jp" => [ N_("Japanese 106 keys"), "jp106", "jp", 0 ], "kan" => [ N_("Kannada"), "us", "kan", 1 ], -#There is no XKB korean file yet; but using xmodmap one disables -# some functioanlity; "us" used for XKB until this is fixed +# There is no XKB korean file yet; but using xmodmap one disables +# some functionality; "us" used for XKB until this is fixed "kr" => [ N_("Korean keyboard"), "us", "us", 1 ], "ky" => [ N_("Kyrgyz keyboard"), "ru", "ky", 1 ], "la" => [ N_("Latin American"), "la-latin1", "la", 0 ], @@ -294,6 +294,7 @@ my %grp_toggles = ( shift_toggle => N_("Both Shift keys simultaneously"), ctrl_shift_toggle => N_("Control and Shift keys simultaneously"), caps_toggle => N_("CapsLock key"), + shift_caps_toggle => N_("Shift and CapsLock keys simultaneously"), ctrl_alt_toggle => N_("Ctrl and Alt keys simultaneously"), alt_shift_toggle => N_("Alt and Shift keys simultaneously"), menu_toggle => N_("\"Menu\" key"), @@ -457,7 +458,7 @@ sub keyboard2full_xkb { XkbModel => $XkbModel, XkbOptions => join(',', if_($keyboard->{GRP_TOGGLE}, - if_($keyboard->{GRP_TOGGLE} eq 'rwin_toggle', 'compose:rwin'), + if_($keyboard->{GRP_TOGGLE} ne 'rwin_toggle', 'compose:rwin'), "grp:$keyboard->{GRP_TOGGLE}", 'grp_led:scroll'), if_(member($XkbLayout, 'az', 'tr', 'tr_f'), 'caps:shift')), |