From 54f3f13bf027d6fcbd7a7d9613e3e2057b3af664 Mon Sep 17 00:00:00 2001 From: damien Date: Wed, 18 Apr 2001 07:44:52 +0000 Subject: last corrections --- perl-install/standalone/net_monitor | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/standalone/net_monitor') 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 { -- cgit v1.2.1