summaryrefslogtreecommitdiffstats
path: root/perl-install/network/tools.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/network/tools.pm')
-rw-r--r--perl-install/network/tools.pm10
1 files changed, 8 insertions, 2 deletions
diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm
index bdfa8a13a..d3dc102f9 100644
--- a/perl-install/network/tools.pm
+++ b/perl-install/network/tools.pm
@@ -72,9 +72,15 @@ sub passwd_by_login {
}
}
-sub connect_backend() { run_program::rooted($::prefix, "$connect_file &") }
+sub connect_backend {
+ my ($netc) = @_;
+ run_program::rooted($::prefix, "ifup $netc->{NET_INTERFACE} &");
+}
-sub disconnect_backend() { run_program::rooted($::prefix, "$disconnect_file &") }
+sub disconnect_backend {
+ my ($netc) = @_;
+ run_program::rooted($::prefix, "ifdown $netc->{NET_INTERFACE} &");
+}
sub connected() { gethostbyname("mandrakesoft.com") ? 1 : 0 }