diff options
author | damien <damien@mandriva.com> | 2001-04-16 14:09:10 +0000 |
---|---|---|
committer | damien <damien@mandriva.com> | 2001-04-16 14:09:10 +0000 |
commit | 55ef6d852025b2aee6f633ecb72f588630acb035 (patch) | |
tree | c78cc09bba08cf2ba8d6785296cfec018b709e7c /perl-install | |
parent | 9e61cebbdab8825bcff4bd95d66a73ea736b2093 (diff) | |
download | drakx-55ef6d852025b2aee6f633ecb72f588630acb035.tar drakx-55ef6d852025b2aee6f633ecb72f588630acb035.tar.gz drakx-55ef6d852025b2aee6f633ecb72f588630acb035.tar.bz2 drakx-55ef6d852025b2aee6f633ecb72f588630acb035.tar.xz drakx-55ef6d852025b2aee6f633ecb72f588630acb035.zip |
updated
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/net_monitor | 6 |
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 { |