diff options
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/draknet | 5 |
1 files changed, 2 insertions, 3 deletions
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 { |