summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorStew Benedict <stewb@mandriva.org>2001-04-03 18:44:23 +0000
committerStew Benedict <stewb@mandriva.org>2001-04-03 18:44:23 +0000
commit53b44143791cff77b22c05dd46e8d8761fdcb5da (patch)
treea8f403f6d9cc1e7a7ca846b393541cf9f80877c2 /perl-install/install_steps_interactive.pm
parentc575ba1f836b16e8dfa87ec10f15d2a4e4dddf46 (diff)
downloaddrakx-53b44143791cff77b22c05dd46e8d8761fdcb5da.tar
drakx-53b44143791cff77b22c05dd46e8d8761fdcb5da.tar.gz
drakx-53b44143791cff77b22c05dd46e8d8761fdcb5da.tar.bz2
drakx-53b44143791cff77b22c05dd46e8d8761fdcb5da.tar.xz
drakx-53b44143791cff77b22c05dd46e8d8761fdcb5da.zip
PPC keyboard/mouse button emulation
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm12
1 files changed, 11 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 5ae27f918..44e0dedca 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -246,7 +246,17 @@ sub selectMouse {
\&mouse::serial_port2text,
[ mouse::serial_ports ]) or return;
}
-
+ if (arch() =~ /ppc/ && $o->{mouse}{nbuttons} == 1) {
+ #- set a sane default F11/F12
+ $o->{mouse}{button2_key} = 87;
+ $o->{mouse}{button3_key} = 88;
+ $o->ask_from_entries_refH('', _("Buttons emulation"),
+ [
+ { label => _("Button 2 Emulation"), val => \$o->{mouse}{button2_key}, list => [ mouse::ppc_one_button_keys() ], format => \&mouse::ppc_one_button_key2text },
+ { label => _("Button 3 Emulation"), val => \$o->{mouse}{button3_key}, list => [ mouse::ppc_one_button_keys() ], format => \&mouse::ppc_one_button_key2text },
+ ]) or return;
+ }
+
any::setup_thiskind($o, 'usb', !$::expert, 0, $o->{pcmcia}) if $o->{mouse}{device} eq "usbmouse";
eval {
devices::make("usbmouse");