From a901b76faa10b814145b8fffd27d27cf5c6f7439 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 21 Dec 2004 10:44:04 +0000
Subject: fix floppies detection (through dmidecode)

---
 perl-install/detect_devices.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/detect_devices.pm')

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 67296c01a..4eb555a8c 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -55,7 +55,7 @@ sub floppies() {
     my @fds;
     my @dmis = dmidecode();
     # do not try to load floppy if there's no floppy drive:
-    if (!@dmis || find { $_->{'Internal Reference Designator'} eq 'FLOPPY' && $_->{name} eq 'Port Connector' } @dmis) {
+    if (!@dmis || find { $_->{'Internal Reference Designator'} =~ /^(FLOPPY|FDD)$/ && $_->{name} eq 'Port Connector' } @dmis) {
         eval { modules::load("floppy") if $::isInstall };
         if (!$@) {
             @fds = map {
-- 
cgit v1.2.1