From 3a736abf4fba1abf2ac584d6736f32d542126285 Mon Sep 17 00:00:00 2001
From: Sammy Valtonen <sammy.valtonen@isec.com>
Date: Thu, 9 Jul 2026 13:34:15 +0200
Subject: [PATCH] Don't warn on closing setup window when saved settings are
 valid

---
 client/source/DelphiLint.SetupForm.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/client/source/DelphiLint.SetupForm.pas b/client/source/DelphiLint.SetupForm.pas
index 2d22932..8eef07c 100644
--- a/client/source/DelphiLint.SetupForm.pas
+++ b/client/source/DelphiLint.SetupForm.pas
@@ -170,7 +170,7 @@ procedure TLintSetupForm.RefreshTheme;
 
 procedure TLintSetupForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
 begin
-  if FSaved then begin
+  if FSaved or IsSetupValid then begin
     CanClose := True;
     Exit;
   end;