From 3322e7340edde4ecc2f1206b8fef7e836d98e80d Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Sat, 17 Sep 2005 23:17:56 +0000
Subject: (custom_id) try harder to have a sane name: before fallbacking to the
 class name (eg: "Printer"), try to use the vendor name (eg for printers)

---
 perl-install/harddrake/data.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/harddrake')

diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm
index 13c5097c6..af99e1525 100644
--- a/perl-install/harddrake/data.pm
+++ b/perl-install/harddrake/data.pm
@@ -531,7 +531,8 @@ sub custom_id {
          $device->{"Socket Designation"} ?
          "$device->{name} (" . $device->{"Socket Designation"} . ")" :
          $device->{name} ? $device->{name} :
-         (defined($device->{description}) ? $device->{description} : $str));
+           (defined($device->{description}) ? $device->{description} :
+              (defined($device->{Vendor}) ? $device->{Vendor} : $str)));
 }
 
 1;
-- 
cgit v1.2.1