summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-04-18 07:44:52 +0000
committerdamien <damien@mandriva.com>2001-04-18 07:44:52 +0000
commit54f3f13bf027d6fcbd7a7d9613e3e2057b3af664 (patch)
treeb9d693edacacc450faa7fde45765efb2ea24ffa7 /perl-install/standalone
parent7a7e11261ee8c06ad523edf1e58b964ecd735ea9 (diff)
downloaddrakx-backup-do-not-use-54f3f13bf027d6fcbd7a7d9613e3e2057b3af664.tar
drakx-backup-do-not-use-54f3f13bf027d6fcbd7a7d9613e3e2057b3af664.tar.gz
drakx-backup-do-not-use-54f3f13bf027d6fcbd7a7d9613e3e2057b3af664.tar.bz2
drakx-backup-do-not-use-54f3f13bf027d6fcbd7a7d9613e3e2057b3af664.tar.xz
drakx-backup-do-not-use-54f3f13bf027d6fcbd7a7d9613e3e2057b3af664.zip
last corrections
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/draknet4
-rwxr-xr-xperl-install/standalone/net_monitor3
2 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/standalone/draknet b/perl-install/standalone/draknet
index 37a1e4629..932d732b7 100755
--- a/perl-install/standalone/draknet
+++ b/perl-install/standalone/draknet
@@ -328,7 +328,7 @@ $window1->show_all();
$_->hide foreach ($button1, $button3);
Gtk->main_iteration while Gtk->events_pending;
$::isEmbedded and kill USR2, $::CCPID;
-my $tag = Gtk->timeout_add(5000, sub { update(); 1 });
+my $tag = Gtk->timeout_add(5000, \&update);
Gtk->main;
Gtk->exit(0);
@@ -369,6 +369,8 @@ sub update {
}
$clist1->thaw();
$button_del->set_sensitive(netconnect::get_profiles() > 1);
+ $tag = Gtk->timeout_add(5000, \&update);
+ 0;
}
sub quit_global {
diff --git a/perl-install/standalone/net_monitor b/perl-install/standalone/net_monitor
index cce794c5f..54faa40d9 100755
--- a/perl-install/standalone/net_monitor
+++ b/perl-install/standalone/net_monitor
@@ -224,7 +224,8 @@ sub update {
$statusbar->push(1, netconnect::connected('', $netc) ? _("Connected") : _("Not connected"));
$isconnected ? $pix_c->set($pix_c_map, $pix_c_mask) : $pix_c->set($pix_d_map, $pix_d_mask);
}
- 1;
+ $time_tag2 = Gtk->timeout_add(5000, \&update);
+ 0;
}
sub draw_monitor {