(configure_eth_aliases) introduce it to autoconfigure all ethernet

aliases (MdkMove, harddrake service, drakconnect)

1 files changed, 10 insertions, 0 deletions

diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm
index 0dcebdcc5..6f6372e6f 100644
--- a/perl-install/network/ethernet.pm
+++ b/perl-install/network/ethernet.pm
@@ -191,4 +191,14 @@ want to use the default host name."),
     1;
 }
 
+# automatic net aliases configuration
+sub configure_eth_aliases() {
+    modules::remove_alias_regexp('^(wlan|eth)[0-9]*$');
+    modules::load_category('network/main|gigabit|usb');
+    foreach (detect_devices::getNet()) {
+        my $driver = c::getNetDriver($_) or next;
+        modules::add_alias($_, $driver);
+    }
+}
+
 1;