summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-04-16 14:09:10 +0000
committerdamien <damien@mandriva.com>2001-04-16 14:09:10 +0000
commit55ef6d852025b2aee6f633ecb72f588630acb035 (patch)
treec78cc09bba08cf2ba8d6785296cfec018b709e7c /perl-install/standalone
parent9e61cebbdab8825bcff4bd95d66a73ea736b2093 (diff)
downloaddrakx-55ef6d852025b2aee6f633ecb72f588630acb035.tar
drakx-55ef6d852025b2aee6f633ecb72f588630acb035.tar.gz
drakx-55ef6d852025b2aee6f633ecb72f588630acb035.tar.bz2
drakx-55ef6d852025b2aee6f633ecb72f588630acb035.tar.xz
drakx-55ef6d852025b2aee6f633ecb72f588630acb035.zip
updated
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/net_monitor6
1 files changed, 1 insertions, 5 deletions
diff --git a/perl-install/standalone/net_monitor b/perl-install/standalone/net_monitor
index 2aebf3855..1da91ebf0 100755
--- a/perl-install/standalone/net_monitor
+++ b/perl-install/standalone/net_monitor
@@ -127,11 +127,7 @@ sub connection {
0;
});
Gtk->main_iteration while Gtk->events_pending;
- my $pid;
- unless ($pid = fork) {
- die (_("cannot fork: ") . $~) unless defined $pid;
- exec( $isconnected2 ? "/etc/sysconfig/network-scripts/net_cnx_down" : "/etc/sysconfig/network-scripts/net_cnx_up");
- }
+ my $tag2 = Gtk->timeout_add(1000, sub { system( $isconnected2 ? "/etc/sysconfig/network-scripts/net_cnx_down &" : "/etc/sysconfig/network-scripts/net_cnx_up &"); 0; });
}
sub rescan {