paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-11 09:30:31 +01:00
Code Issues Packages Projects Releases Wiki Activity

* Fix bug ID #34059, double flush in compressed stream

Browse Source 
git-svn-id: trunk@39526 -
This commit is contained in:
michael 2018-07-30 13:37:16 +00:00
parent ab84f09591
commit 7c0eec6a3f
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-pdf/src/fppdf.pp
View File

@ -1212,7 +1212,7 @@ begin
try
AFrom.Position := 0;
c.CopyFrom(AFrom, AFrom.Size);
c.Flush;
//c.Flush; called in c.Free
finally
c.Free;
end;