From 5e0029e71c6dccc26bc42132f7f689c71e696aa7 Mon Sep 17 00:00:00 2001 From: damien Date: Sun, 12 Aug 2001 21:54:35 +0000 Subject: longer timeout --- perl-install/standalone/draknet | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'perl-install/standalone/draknet') diff --git a/perl-install/standalone/draknet b/perl-install/standalone/draknet index a5379a7d0..e6be72764 100755 --- a/perl-install/standalone/draknet +++ b/perl-install/standalone/draknet @@ -339,7 +339,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, \&update); +my $tag = Gtk->timeout_add(10000, \&update); Gtk->main; Gtk->exit(0); @@ -395,8 +395,7 @@ sub update { build_clist(); $clist1->thaw(); $button_del->set_sensitive(network::netconnect::get_profiles() > 1); - $tag = Gtk->timeout_add(5000, \&update); - 0; + 1; } sub quit_global { -- cgit v1.2.1