summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-08-17 11:15:02 +0000
committerdamien <damien@mandriva.com>2001-08-17 11:15:02 +0000
commit98b2c7e5242eb5e938d775d40e18df2c576749db (patch)
tree4456516cd784c43192a60d2e396ad005ad8ffc73 /perl-install/standalone
parent08c73d71e15c7894f6d0b504999550b090e7e279 (diff)
downloaddrakx-backup-do-not-use-98b2c7e5242eb5e938d775d40e18df2c576749db.tar
drakx-backup-do-not-use-98b2c7e5242eb5e938d775d40e18df2c576749db.tar.gz
drakx-backup-do-not-use-98b2c7e5242eb5e938d775d40e18df2c576749db.tar.bz2
drakx-backup-do-not-use-98b2c7e5242eb5e938d775d40e18df2c576749db.tar.xz
drakx-backup-do-not-use-98b2c7e5242eb5e938d775d40e18df2c576749db.zip
added no internet connection configured label on button
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/net_monitor4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/standalone/net_monitor b/perl-install/standalone/net_monitor
index 44dcc5074..9d0985c35 100755
--- a/perl-install/standalone/net_monitor
+++ b/perl-install/standalone/net_monitor
@@ -361,6 +361,10 @@ sub update {
$statusbar->push(1, connected() ? _("Connected") : _("Not connected"));
$isconnected ? $pix_c->set($pix_c_map, $pix_c_mask) : $pix_c->set($pix_d_map, $pix_d_mask);
}
+ if (!(-e $connect_file && -e $disconnect_file)) {
+ $button_connect->set_sensitive(0);
+ $label_c->set("No internet connection configured");
+ }
$time_tag2 = Gtk->timeout_add(5000, \&update);
0;
}