paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-23 14:49:10 +02:00
Code Issues Packages Projects Releases Wiki Activity

lcl: TJSONPropStorage, do not split at underscore

Browse Source 
git-svn-id: trunk@54163 -
This commit is contained in:
mattias 2017-02-15 11:42:20 +00:00
parent 9d6acea295
commit b2fd45b8bf
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lcl/jsonpropstorage.pas
View File

@ -109,7 +109,6 @@ end;
function TCustomJSONPropStorage.FixPath(const APath: String): String;
begin
Result:=StringReplace(APath,'.','/',[rfReplaceAll]);
Result:=StringReplace(APath,'_','/',[rfReplaceAll]);
end;
procedure TCustomJSONPropStorage.StorageNeeded(ReadOnly: Boolean);