From 42fa9149b03410ab5af092aec84a3f8d089e7615 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Mon, 15 Aug 2016 02:19:47 +0200
Subject: [PATCH] prevent to add the FSP to the group if not yet saved

---
 src/ce_main.pas      | 2 ++
 src/ce_projgroup.pas | 2 ++
 2 files changed, 4 insertions(+)

diff --git a/src/ce_main.pas b/src/ce_main.pas
index 6987f1f4..dbab2d00 100644
--- a/src/ce_main.pas
+++ b/src/ce_main.pas
@@ -3197,6 +3197,8 @@ begin
     exit;
   if fFreeProj.inGroup then
     exit;
+  if not fFreeProj.filename.fileExists then
+    exit;
   fProjectGroup.addProject(fFreeProj);
   fFreeProj := nil;
 end;
diff --git a/src/ce_projgroup.pas b/src/ce_projgroup.pas
index 3ad3b806..9e71deb3 100644
--- a/src/ce_projgroup.pas
+++ b/src/ce_projgroup.pas
@@ -534,6 +534,8 @@ procedure TCEProjectGroupWidget.btnAddUnfocusedClick(Sender: TObject);
 begin
   if fFreeProj = nil then
     exit;
+  if not fFreeProj.filename.fileExists then
+    exit;
   projectGroup.addProject(fFreeProj);
   fFreeProj := nil;
   updateList;