Versione 4.1.4

versione 4.1.2
VERSIONE 4.1.1
VERSIONE 4.1.0
VERSIONE 4.0.0
VERSIONE 3.6.52
VERSIONE 3.6.47
VERSIONE 3.6.22

.project

@@ -2,7 +2,7 @@
 Title=DnfDrake
 Startup=Fmain
 Icon=dnfdrake.svg
-Version=4.1.2
+Version=4.1.4
 Component=gb.image
 Component=gb.gui
 Component=gb.form

.src/FABOUT.form

@@ -19,7 +19,7 @@
       MoveScaled(0,0,51,5)
       Font = Font["+7"]
       Alignment = Align.Center
-      Text = ("DnfDrake 4.1.2")
+      Text = ("DnfDrake 4.1.4")
     }
   }
 }

.src/FEXTRA.class

@@ -169,13 +169,17 @@ Public Sub BTNCLOSE_Click()
         Endif
     Endif    
 
-   If CHKDNFDRAKETRAY.VALUE = True And If LBLDRAKETRAYSTATUS.Text = "Draketray is not running" Then
+   ' If CHKDNFDRAKETRAY.VALUE = True And If LBLDRAKETRAYSTATUS.Text = "Draketray is not running" Then
+   If CHKDNFDRAKETRAY.VALUE = True Then
+
 '      If Not Exist(User.Home &/ "/.config/draketray/locktray") Then
+    If LBLDRAKETRAYSTATUS.Text = "Draketray is not running" Then
       If Right(Left($LOCK)) <> "2" Then
           Fmain.$KILL = 2
           Shell ("/usr/bin/draketray.gambas")
           Sleep 1.1
         Endif
+      Endif   
       ' Shell "ps aux | grep gbr3 | grep draketray | wc -l" Wait To $LOCK  
       '  If Right(Left($LOCK)) = "2" Then 
       '     'CHKDNFDRAKETRAY.Value = True

.src/Fmain.class

@@ -2644,8 +2644,8 @@ Public Sub LOADICONS()
     BTNPKGLISTCLEAN.Picture = Picture.Load($PATHICONS & "trash" & $THEMESSUFFIX)
     BTNADDPKGLIST.Picture = Picture.Load($PATHICONS & "insert-text" & $THEMESSUFFIX)
     BTNPKGLISTVIEW.Picture = Picture.Load($PATHICONS & "view-log" & $THEMESSUFFIX)
-    PCTCONNECT.Picture = Picture.Load($PATHICONS & "offline.png")
-    PCTDISCONNECT.Picture = Picture.Load($PATHICONS & "online.png")
+    PCTCONNECT.Picture = Picture.Load($PATHICONS & "offline" & $THEMESSUFFIX)
+    PCTDISCONNECT.Picture = Picture.Load($PATHICONS & "online" & $THEMESSUFFIX)
     PICSUSPEND.Picture = Picture.Load($PATHICONS & "suspend" & $THEMESSUFFIX)
     PICSUSPENDLOCK.Picture = Picture.Load($PATHICONS & "lock" & $THEMESSUFFIX)
     BTNCUSTOM.Picture = Picture.Load($PATHICONS & "bacchetta" & $THEMESSUFFIX)