From 59fe5d169b209f87aae73516422d3d33f33c085a Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Sun, 4 Jan 2015 01:38:18 +0100 Subject: [PATCH] fix, error in temp runnable module, file could be reopened --- src/ce_main.pas | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/ce_main.pas b/src/ce_main.pas index af8f89de..fa0afb26 100644 --- a/src/ce_main.pas +++ b/src/ce_main.pas @@ -999,8 +999,10 @@ var begin result := -1; if fEditWidg = nil then exit; - for i := 0 to fEditWidg.editorCount-1 do + for i := 0 to fEditWidg.editorCount-1 do begin if fEditWidg.editor[i].fileName = aFilename then exit(i); + if fEditWidg.editor[i].tempFilename = aFilename then exit(i); + end; end; procedure TCEMainForm.openFile(const aFilename: string); @@ -1019,7 +1021,7 @@ begin fEditWidg.addEditor; fEditWidg.editor[i].loadFromFile(aFilename); fEditWidg.focusedEditorChanged; - fFileMru.Insert(0,aFilename); + fFileMru.Insert(0, aFilename); end; procedure TCEMainForm.saveFile(const edIndex: NativeInt);