From 46a17e6d144de20d276d72cd4a99e71d496928ef Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Sun, 2 Mar 2008 17:59:57 +0000 Subject: [PATCH] Fix faulty IF construct in previous commit: menuEditVariable always displayed the STR_NOTSUPPORTED hint. --- source/childwin.pas | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/source/childwin.pas b/source/childwin.pas index 5d4f0f60..a175f6a1 100644 --- a/source/childwin.pas +++ b/source/childwin.pas @@ -4427,10 +4427,10 @@ end; procedure TMDIChild.popupHostPopup(Sender: TObject); begin Kill1.Enabled := (PageControlHost.ActivePage = tabProcessList) and Assigned(ListProcesses.FocusedNode); - menuEditVariable.Enabled := (mysql_version >= 40003) - and (PageControlHost.ActivePage = tabVariables) - and Assigned(ListVariables.FocusedNode); - if not menuEditVariable.Enabled then + menuEditVariable.Enabled := False; + if mysql_version >= 40003 then + menuEditVariable.Enabled := (PageControlHost.ActivePage = tabVariables) and Assigned(ListVariables.FocusedNode) + else menuEditVariable.Hint := STR_NOTSUPPORTED; end;