From 7474d0f59c75430a3a90a8a05dd2a31533ca35e1 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Thu, 19 Jun 2014 10:03:25 +0000
Subject: [PATCH] IDE: lpi: store last unitname

git-svn-id: trunk@45576 -
---
 ide/project.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ide/project.pp b/ide/project.pp
index f402654104..7644f1397b 100644
--- a/ide/project.pp
+++ b/ide/project.pp
@@ -1739,7 +1739,7 @@ begin
     XMLConfig.SetDeleteValue(Path+'ResourceBaseClass/Value',
                              PFComponentBaseClassNames[FResourceBaseClass],
                              PFComponentBaseClassNames[pfcbcNone]);
-    XMLConfig.SetDeleteValue(Path+'UnitName/Value',fUnitName,ExtractFileNameOnly(AFilename));
+    XMLConfig.SetDeleteValue(Path+'UnitName/Value',fUnitName,'');
     // save custom data
     SaveStringToStringTree(XMLConfig,CustomData,Path+'CustomData/');
   end;