From f389b08008777099ad0fef6f90ce51e4bfb95182 Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Tue, 1 Sep 2015 17:05:57 +0200 Subject: [PATCH] di-5 project MRU list ready --- src/ce_mru.pas | 12 +++++------- 1 file changed, 5 insertions(+), 7 deletions(-) diff --git a/src/ce_mru.pas b/src/ce_mru.pas index 79e246b3..3d916f7c 100644 --- a/src/ce_mru.pas +++ b/src/ce_mru.pas @@ -210,14 +210,12 @@ end; procedure TCEMRUProjectList.projClosing(aProject: ICECommonProject); var - natProj: TCENativeProject; + fname: string; begin - if aProject.getFormat = pfNative then - begin - natProj := TCENativeProject(aProject.getProject); - if FileExists(natProj.fileName) then - Insert(0, natProj.fileName); - end; + if aProject = nil then exit; + // + fname := aProject.getFilename; + if FileExists(fname) then Insert(0, fname); end; initialization