From 8beaa87ba67d11e8e46c3f136df3045e3d9c7cd0 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 18 Jun 2004 00:32:57 +0000 Subject: fix displaying pci/usb vendor and device id --- perl-install/standalone/harddrake2 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/standalone/harddrake2') diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 1a7adebb1..ffd0bc81b 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -54,7 +54,7 @@ my %fields = "pci_device" => [ N("PCI device #"), N("") ], "pci_function" => [ N("PCI function #"), N("") ], "vendor" => [ N("Vendor ID"), N("") ], - "id" => [ N(""), N("Device ID") ], + "id" => [ N("Device ID"), N("") ], "subvendor" => [ N("Sub vendor ID"), N("") ], "subid" => [ N("Sub device ID"), N("") ], "usb_pci_device" =>, [ N("Device USB ID"), N("") ], @@ -397,7 +397,7 @@ foreach (@classes) { rename_field($_, 'usb_vendor', 'vendor'); rename_field($_, 'vendor_name', 'Vendor'); - foreach my $i (qw(EMULATEWHEEL MOUSETYPE XMOUSETYPE auxmouse devfs_prefix unsafe val vendor wacom)) { delete $_->{$i} }; + foreach my $i (qw(EMULATEWHEEL MOUSETYPE XMOUSETYPE auxmouse devfs_prefix unsafe val wacom)) { delete $_->{$i} }; my $custom_id = harddrake::data::custom_id($_, $title); foreach my $field (qw(devfs_device device)) { -- cgit v1.2.1