From d94f11b6066aa854076e91dceee8b104bfb12508 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Sun, 26 Sep 2004 06:38:18 +0000
Subject: (go2state) do not destroy/re-create menu if state hasn't changed, or
 else the menu may disappear without any reason

---
 perl-install/standalone/net_applet | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

(limited to 'perl-install/standalone/net_applet')

diff --git a/perl-install/standalone/net_applet b/perl-install/standalone/net_applet
index 35ef4703e..9bcc3bd3e 100644
--- a/perl-install/standalone/net_applet
+++ b/perl-install/standalone/net_applet
@@ -14,7 +14,7 @@ use Gtk2::TrayIcon;
 use ugtk2 qw(:create :helpers :wrappers);
   
 my ($eventbox, $img);
-my ($menu, $timeout);
+my ($current_state, $menu, $timeout);
 my $onstartupfile = "$ENV{HOME}/.net_applet";
 add_icon_path("/usr/share/libDrakX/pixmaps/");
 # Allow multiple instances, but only one per user:
@@ -131,8 +131,11 @@ sub cronNetwork() {
 }
 sub go2State {
     my ($state_type, $interface) = @_;
-    $menu and $menu->destroy;
-    $menu = setState($state_type, $interface);
+    if ($current_state ne $state_type) {
+        $current_state = $state_type;
+        $menu and $menu->destroy;
+        $menu = setState($state_type, $interface);
+    }
 }
 sub setState {
     my ($state_type, $interface) = @_;
-- 
cgit v1.2.1