From 840b158eb8168ff8cec75d909d6ab87483fc1dbf Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Sat, 16 Jul 2011 14:11:30 +0000
Subject: [PATCH] * Fixed DeleteKey. Deleting the last key does not delete the
 section (Delphi/Windows compatible)

git-svn-id: trunk@18000 -
---
 packages/fcl-base/src/inifiles.pp | 1 -
 1 file changed, 1 deletion(-)

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;