Browse Source

* No PIPE signal on darwin

git-svn-id: trunk@23245 -
michael 12 years ago
parent
commit
33b6b8eef5
1 changed files with 2 additions and 2 deletions
  1. 2 2
      packages/fcl-web/src/base/fphttpserver.pp

+ 2 - 2
packages/fcl-web/src/base/fphttpserver.pp

@@ -388,10 +388,10 @@ end;
 
 
 procedure TFPHTTPConnection.SetupSocket;
 procedure TFPHTTPConnection.SetupSocket;
 begin
 begin
-  {$ifdef unix}
+{$if defined(FreeBSD) or defined(Linux)}
   FSocket.ReadFlags:=MSG_NOSIGNAL;
   FSocket.ReadFlags:=MSG_NOSIGNAL;
   FSocket.WriteFlags:=MSG_NOSIGNAL;
   FSocket.WriteFlags:=MSG_NOSIGNAL;
-  {$endif}
+{$endif}
 end;
 end;
 
 
 Procedure TFPHTTPConnection.InterPretHeader(ARequest : TFPHTTPConnectionRequest; Const AHeader : String);
 Procedure TFPHTTPConnection.InterPretHeader(ARequest : TFPHTTPConnectionRequest; Const AHeader : String);