From 5b30e65108ae6fd3c7782702f761069282109114 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 22 Jul 2004 02:57:06 +0000
Subject: cleanup

---
 perl-install/detect_devices.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 58731e0a3..77fa5c388 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -855,13 +855,13 @@ sub suggest_mount_point {
     my ($e) = @_;
 
     my $name = $e->{media_type};
-    if (member($name, 'hd', 'fd')) {
+    if (member($e->{media_type}, 'hd', 'fd')) {
 	if (exists $e->{usb_driver}) {
 	    return usb2removable($e) || 'removable';
 	}
 	if (isZipDrive($e)) {
 	    $name = 'zip';
-	} elsif ($name eq 'fd') {
+	} elsif ($e->{media_type} eq 'fd') {
 	    $name = 'floppy';
 	} else {
 	    log::l("suggest_mount_point: don't know what to with hd $e->{device}");
-- 
cgit v1.2.1