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;