From 056e849fc24c4f4b701a59158c38f72fcfbdecee Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Thu, 30 Aug 2001 16:38:26 +0000 Subject: fix previous fix (typo). --- perl-install/standalone/mousedrake | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/standalone') diff --git a/perl-install/standalone/mousedrake b/perl-install/standalone/mousedrake index 9742bd7de..c7e543d91 100755 --- a/perl-install/standalone/mousedrake +++ b/perl-install/standalone/mousedrake @@ -52,7 +52,7 @@ if (!$mouse || !$::auto) { Gtk->timeout_remove($time_tag2) if $::isEmbedded && ref($in) =~ /gtk/; $name or $::isEmbedded ? do { kill(USR1, $::CCPID); goto begin } : $in->exit(0); my $mouse_chosen = mouse::fullname2mouse($name); - $mouse->{type} eq $mouse_chosen->{type} && $mouse->{name} eq $mouse_chosen->{type} or $mouse = $mouse_chosen; + $mouse->{type} eq $mouse_chosen->{type} && $mouse->{name} eq $mouse_chosen->{name} or $mouse = $mouse_chosen; if ($mouse->{device} eq "usbmouse") { my ($c) = grep { $_->{driver} =~ /usb-[ou]hci/ } detect_devices::pci_probe(0) or die _("no serial_usb found\n"); -- cgit v1.2.1