paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-22 18:49:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix bug #31587

Browse Source 
git-svn-id: trunk@35644 -
This commit is contained in:
michael 2017-03-23 15:22:07 +00:00
parent cfa5a354cb
commit 3148129d6f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-json/src/jsonconf.pp
View File

@ -724,7 +724,7 @@ Var
F : TFileStream; F : TFileStream;
begin begin
F:=TFileStream.Create(AFileName,fmopenRead); F:=TFileStream.Create(AFileName,fmopenRead or fmShareDenyWrite);
try try
LoadFromStream(F); LoadFromStream(F);
finally finally