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

* Fix from Kevin Jesshope to fix concurrent access in case of CGI

Browse Source
This commit is contained in:
Michaël Van Canneyt 2022-08-24 09:54:10 +02:00
parent 87ea9a9e0f
commit f8bf34303c
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-web/src/base/fpmimetypes.pp
View File

@ -310,7 +310,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