From f82c3bc5a5add35e8c7ac61f43c030d76585296e Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Wed, 25 Jan 2012 18:29:52 +0000
Subject: (getISDN) kill it (is commented out since 10.5 years...)

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

(limited to 'perl-install')

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index bc0584bd0..3c2fe0065 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -764,10 +764,6 @@ sub device_matches_sysfs_device {
   device_matches_sysfs_ids($device, get_ids_from_sysfs_device($dev_path));
 }
 
-#sub getISDN() {
-#    mapgrep(sub {member (($_[0] =~ /\s*(\w*):/), @netdevices), $1 }, split(/\n/, cat_("/proc/net/dev")));
-#}
-
 sub getUPS() {
     # MGE serial PnP devices:
     (map {
-- 
cgit v1.2.1