From e4caee01567512d4f7751f8614d4d3541a062a62 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 12 Nov 2003 12:28:02 +0000 Subject: fix warning with usb mice --- perl-install/standalone/harddrake2 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 22411ac3a..164b6a09d 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -293,7 +293,7 @@ foreach (@harddrake::data::tree) { rename_field($_, 'vendor_name', 'Vendor'); rename_field($_, 'usb_driver', 'driver'); rename_field($_, 'usb_media_type', 'media_type'); - foreach my $i (qw(MOUSETYPE XMOUSETYPE auxmouse devfs_prefix id pci_bus pci_device pci_function subid subvendor unsafe usb_bus usb_pci_bus usb_pci_device usb_vendor val vendor wacom)) { delete $_->{$i} }; + foreach my $i (qw(EMULATEWHEEL MOUSETYPE XMOUSETYPE auxmouse devfs_prefix id pci_bus pci_device pci_function subid subvendor unsafe usb_bus usb_pci_bus usb_pci_device usb_vendor val vendor wacom)) { delete $_->{$i} }; my $custom_id = harddrake::data::custom_id($_, $title); foreach my $field (qw(devfs_device device)) { -- cgit v1.2.1