Browse Source

* Fixed DeleteKey. Deleting the last key does not delete the section (Delphi/Windows compatible)

git-svn-id: trunk@18000 -
michael 14 years ago
parent
commit
840b158eb8
1 changed files with 0 additions and 1 deletions
  1. 0 1
      packages/fcl-base/src/inifiles.pp

+ 0 - 1
packages/fcl-base/src/inifiles.pp

@@ -925,7 +925,6 @@ begin
       begin
       begin
       oSection.KeyList.Delete(oSection.KeyList.IndexOf(oKey));
       oSection.KeyList.Delete(oSection.KeyList.IndexOf(oKey));
       oKey.Free;
       oKey.Free;
-      MaybeDeleteSection(oSection);
       MaybeUpdateFile;
       MaybeUpdateFile;
       end;
       end;
     end;
     end;