From cb6c0a50919878d31fd0d76f70bb515e77e2837b Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Thu, 4 Apr 2019 10:10:35 +0200 Subject: [PATCH] nothing --- src/u_main.pas | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/u_main.pas b/src/u_main.pas index ad86ba18..d178078b 100644 --- a/src/u_main.pas +++ b/src/u_main.pas @@ -2765,7 +2765,6 @@ procedure TMainForm.actLayoutResetExecute(Sender: TObject); begin InitDocking(true); end; - {$ENDREGION} {$REGION edit ------------------------------------------------------------------} @@ -3301,7 +3300,7 @@ begin for i := fMultidoc.documentCount-1 downto 0 do begin d := fMultidoc.document[i]; - if not d.Equals(c) then + if d = c then fMultidoc.closeDocument(d); end; end;