diff options
Diffstat (limited to 'perl-install/network')
| -rw-r--r-- | perl-install/network/adsl.pm | 2 | ||||
| -rw-r--r-- | perl-install/network/ethernet.pm | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm index bc3c170e9..2089dd229 100644 --- a/perl-install/network/adsl.pm +++ b/perl-install/network/adsl.pm @@ -307,7 +307,7 @@ TYPE=$kind # set aliases: if (exists $modems{$adsl_device}{aliases}) { - modules::add_alias($_->[0], $_->[1]) foreach @{$modems{$adsl_device}{aliases}}; + modules::set_alias($_->[0], $_->[1]) foreach @{$modems{$adsl_device}{aliases}}; $::isStandalone and modules::write_conf(); } diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm index ea322a7f2..6f9cc8c85 100644 --- a/perl-install/network/ethernet.pm +++ b/perl-install/network/ethernet.pm @@ -87,7 +87,7 @@ sub get_eth_cards_names { foreach my $card (@all_cards) { modules::remove_alias($card->[1]); - modules::add_alias($card->[0], $card->[1]); + modules::set_alias($card->[0], $card->[1]); } { map { $_->[0] => join(': ', $_->[0], $_->[2]) } @all_cards }; @@ -134,7 +134,7 @@ sub conf_network_card_backend { sub configure_eth_aliases() { foreach (detect_devices::getNet()) { my $driver = c::getNetDriver($_) or next; - modules::add_alias($_, $driver); + modules::set_alias($_, $driver); } } |