From 900b586d313f45fe3a75b92624495c2740866e4c Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 15 Mar 2004 09:57:40 +0000 Subject: (configure_net) update connection status in background (#7800) --- perl-install/standalone/drakconnect | 2 ++ 1 file changed, 2 insertions(+) (limited to 'perl-install/standalone/drakconnect') diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 8d7ee4cc0..80b27186a 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -703,6 +703,7 @@ sub adsl_atboot() { (any { /x--boot_time/ } cat_($network::tools::connect_file)) sub update_intbutt() { $int_state->set($isconnected ? N("Connected") : N("Not connected")); + return if !$int_connect; $int_connect->child->set($isconnected ? N("Disconnect...") : N("Connect...")); $int_connect->set_sensitive(1); } @@ -956,6 +957,7 @@ Please run \"Internet access\" in control center.")); ); $dialog->{rwindow}->show_all; + Glib::Timeout->add(200, \&update_intbutt); $dialog->main; ugtk2->exit(0); } -- cgit v1.2.1