summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/mousedrake
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-04-03 14:35:37 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-04-03 14:35:37 +0000
commit0f526e1de2c1eb22d27ddcbcb13fa57083e4e008 (patch)
treee6ce5cfce24918fa0fd0bb97c6d795a6cb5c5d54 /perl-install/standalone/mousedrake
parentb7e5e87ab4982559b3fd121c9d59278bd0702e34 (diff)
downloaddrakx-backup-do-not-use-0f526e1de2c1eb22d27ddcbcb13fa57083e4e008.tar
drakx-backup-do-not-use-0f526e1de2c1eb22d27ddcbcb13fa57083e4e008.tar.gz
drakx-backup-do-not-use-0f526e1de2c1eb22d27ddcbcb13fa57083e4e008.tar.bz2
drakx-backup-do-not-use-0f526e1de2c1eb22d27ddcbcb13fa57083e4e008.tar.xz
drakx-backup-do-not-use-0f526e1de2c1eb22d27ddcbcb13fa57083e4e008.zip
fix horrible error (using an undefined $o)
Diffstat (limited to 'perl-install/standalone/mousedrake')
-rwxr-xr-xperl-install/standalone/mousedrake4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/mousedrake b/perl-install/standalone/mousedrake
index 2c6acde75..b144d2515 100755
--- a/perl-install/standalone/mousedrake
+++ b/perl-install/standalone/mousedrake
@@ -41,8 +41,8 @@ if (!$mouse || !$::auto) {
}
$mouse->{XEMU3} = 'yes' if $mouse->{nbuttons} < 3 && (!$::noauto || $in->ask_yesorno('', _("Emulate third button?"), 1));
-$o->{mouse}{device} =
- $o->ask_from_listf(_("Mouse Port"),
+$mouse->{device} =
+ $in->ask_from_listf(_("Mouse Port"),
_("Please choose on which serial port your mouse is connected to."),
\&mouse::serial_port2text,
[ mouse::serial_ports ]) || goto begin if $mouse->{type} eq 'serial';