From 2fb12b9bc814ef721941a68856221039dbcf3df8 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Mon, 10 Sep 2001 15:55:12 +0000
Subject: moved modules::get_pcmcia_devices into detect_devices::pcmcia_probe.

---
 perl-install/modules.pm | 14 --------------
 1 file changed, 14 deletions(-)

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

diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index 26286ddfe..8850147e2 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -818,20 +818,6 @@ sub configure_pcmcia {
     read_already_loaded();
 }
 
-sub get_pcmcia_devices {
-    my (@devs, $desc);
-
-    foreach (cat_("/var/run/stab")) {
-	if (/^Socket\s+\d+:\s+(.*)/) {
-	    $desc = $1;
-	} else {
-	    my (undef, $type, $module, undef, $device) = split;
-	    push @devs, { description => $desc, driver => $module, type => $type, device => $device };
-	}
-    }
-    @devs;
-}
-
 sub write_pcmcia {
     my ($prefix, $pcmcia) = @_;
 
-- 
cgit v1.2.1