diff --git a/packages/fcl-base/src/inifiles.pp b/packages/fcl-base/src/inifiles.pp
index f246085646..1b8107ecd6 100644
--- a/packages/fcl-base/src/inifiles.pp
+++ b/packages/fcl-base/src/inifiles.pp
@@ -925,7 +925,6 @@ begin
       begin
       oSection.KeyList.Delete(oSection.KeyList.IndexOf(oKey));
       oKey.Free;
-      MaybeDeleteSection(oSection);
       MaybeUpdateFile;
       end;
     end;