summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-07-30 11:28:02 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-07-30 11:28:02 +0000
commit0606c3a0dfbf260ee27eec16fa90f32eedd8ae5b (patch)
tree0e0c2e112d3db6fa934e5f4faa06bd7ffebf69fe
parent3bfb1d3824e7f00d7e129e2aa1d5e8e9c08bf006 (diff)
downloaddrakx-0606c3a0dfbf260ee27eec16fa90f32eedd8ae5b.tar
drakx-0606c3a0dfbf260ee27eec16fa90f32eedd8ae5b.tar.gz
drakx-0606c3a0dfbf260ee27eec16fa90f32eedd8ae5b.tar.bz2
drakx-0606c3a0dfbf260ee27eec16fa90f32eedd8ae5b.tar.xz
drakx-0606c3a0dfbf260ee27eec16fa90f32eedd8ae5b.zip
fix timeout usage
-rw-r--r--perl-install/standalone/net_applet5
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/standalone/net_applet b/perl-install/standalone/net_applet
index 76e808a03..964a951c1 100644
--- a/perl-install/standalone/net_applet
+++ b/perl-install/standalone/net_applet
@@ -11,7 +11,7 @@ use Gtk2::TrayIcon;
use ugtk2 qw(:create :helpers :wrappers);
my ($eventbox, $img);
-my ($menu, $_timeout);
+my ($menu, $timeout);
my $raisedwindow = 0;
my $onstartupfile = "$ENV{HOME}/.net_applet";
add_icon_path("/usr/share/libDrakX/pixmaps/");
@@ -119,7 +119,7 @@ sub getIP {
return wantarray() ? @ip : $ip[0];
}
sub cronNetwork() {
- $_timeout = Glib::Timeout->add(60*1000, sub {
+ $timeout = Glib::Timeout->add(60*1000, sub {
checkNetwork();
1;
});
@@ -146,6 +146,7 @@ sub setState {
$menu
}
sub mainQuit() {
+ Glib::Source->remove($timeout) if $timeout;
Gtk2->main_quit
}
sub setAutoStart {