summaryrefslogtreecommitdiffstats
path: root/perl-install/network/netconnect.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/network/netconnect.pm')
-rw-r--r--perl-install/network/netconnect.pm9
1 files changed, 1 insertions, 8 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 61eefd299..ad7ee7082 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -500,14 +500,7 @@ sub add_profile {
}
sub get_profiles {
- my @a;
- my $i = 0;
- foreach (glob("/etc/sysconfig/network-scripts/drakconnect_conf.*")) {
- s/.*\.//;
- $a[$i] = $_;
- $i++;
- }
- @a;
+ map { if_(/drakconnect_conf\.(.*)/, $1) } all("$::prefix/etc/sysconfig/network-scripts");
}
sub load_conf {