diff options
| author | michael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2015-12-26 13:43:20 +0000 |
|---|---|---|
| committer | michael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2015-12-26 13:43:20 +0000 |
| commit | caf6ada608b6e73fe679f23dd8af31d1ad3d35c8 (patch) | |
| tree | bced9e8729918ce25c719700a34514781c692959 /packages/fcl-web/src/base/custfcgi.pp | |
| parent | bfcbd1e4204420b20fe12442b4c3218598fb502e (diff) | |
| download | fpc-caf6ada608b6e73fe679f23dd8af31d1ad3d35c8.tar.gz | |
* Patch from Dmitriy A. Voroshin to handle clsoed named pipe more gracefully. (bug ID 29203)
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@32724 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/fcl-web/src/base/custfcgi.pp')
| -rw-r--r-- | packages/fcl-web/src/base/custfcgi.pp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/packages/fcl-web/src/base/custfcgi.pp b/packages/fcl-web/src/base/custfcgi.pp index 538c638e02..03d7c32bb4 100644 --- a/packages/fcl-web/src/base/custfcgi.pp +++ b/packages/fcl-web/src/base/custfcgi.pp @@ -384,6 +384,13 @@ begin begin // TODO : Better checking on ErrorCode R.FKeepConnectionAfterRequest:=False; + +{$ifdef windowspipe} + case ErrorCode of + ERROR_BROKEN_PIPE, ERROR_NO_DATA : Exit; //No error here. Server cancel pipe + end; +{$endif} + TFCgiHandler.DoError(SErrWritingSocket,[ErrorCode]); end; Inc(P,BytesWritten); |