summaryrefslogtreecommitdiffstats
path: root/perl-install/harddrake
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/harddrake')
-rw-r--r--perl-install/harddrake/data.pm3
1 files changed, 2 insertions, 1 deletions
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;