From 0b2abe1abda411d0333a53bab0bcec18eccb2042 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 22 Jan 2003 11:56:42 +0000 Subject: simplify easy_dhcp prototype --- perl-install/install_steps_interactive.pm | 2 +- perl-install/network/network.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 44c189b2f..1cc1b6642 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -710,7 +710,7 @@ sub updateModulesFromFloppy { sub configureNetwork { my ($o) = @_; require network::network; - network::network::easy_dhcp($o, $o->{netc}, $o->{intf}); + network::network::easy_dhcp($o->{netc}, $o->{intf}); $o->SUPER::configureNetwork(); } diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm index f182d8013..8101859af 100644 --- a/perl-install/network/network.pm +++ b/perl-install/network/network.pm @@ -433,7 +433,7 @@ sub read_all_conf { } sub easy_dhcp { - my ($_in, $netc, $intf) = @_; + my ($netc, $intf) = @_; return if text2bool($netc->{NETWORKING}); -- cgit v1.2.1