From 4d22d48f2ef0c22f32c3ca49e070e690e6d5fda1 Mon Sep 17 00:00:00 2001 From: Martin Date: Fri, 9 Sep 2022 12:25:27 +0200 Subject: [PATCH] Debugger: fix warning about project debugger backend in global options --- debugger/frames/debugger_class_options.pas | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/debugger/frames/debugger_class_options.pas b/debugger/frames/debugger_class_options.pas index 35bc32252e..2ce77fbbd8 100644 --- a/debugger/frames/debugger_class_options.pas +++ b/debugger/frames/debugger_class_options.pas @@ -589,10 +589,10 @@ begin tbDelete.Enabled := FSelectedDbgPropertiesConfig <> nil; if ShowWarningOverridenByProject then - lblWarningProject.Visible := ( - (Project1.DebuggerBackend <> FSelectedDbgPropertiesConfig.UID) and - (Project1.DebuggerBackend <> 'IDE') and - not( (Project1.DebuggerBackend = '') and (Project1.DebuggerPropertiesConfigList.CountWithoutDeleted > 0) ) + lblWarningProject.Visible := not ( + (Project1.DebuggerBackend = FSelectedDbgPropertiesConfig.UID) or + (Project1.DebuggerBackend = 'IDE') or + ( (Project1.DebuggerBackend = '') and (Project1.DebuggerPropertiesConfigList.CountWithoutDeleted = 0) ) ); end;