From ed11f2db5dcb487afa795b5b9763584dab89abf9 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Thu, 17 Dec 2015 02:49:34 +0100
Subject: [PATCH] fix double close warning since added split view

---
 src/ce_main.pas | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/src/ce_main.pas b/src/ce_main.pas
index 8bd6cde2..247c761f 100644
--- a/src/ce_main.pas
+++ b/src/ce_main.pas
@@ -1575,10 +1575,9 @@ end;
 
 procedure TCEMainForm.actFileCloseExecute(Sender: TObject);
 begin
-  if fDoc = nil then exit;
-  if (fDoc.modified or(fDoc.fileName = fDoc.tempFilename))
-      and (dlgFileChangeClose(fDoc.fileName) = mrCancel) then exit;
- getMultiDocHandler.closeDocument(fDoc);
+  if fDoc = nil then
+    exit;
+  getMultiDocHandler.closeDocument(fDoc);
 end;
 
 procedure TCEMainForm.actFileSaveAllExecute(Sender: TObject);