Jelajahi Sumber

* No PIPE signal on darwin

git-svn-id: trunk@23245 -
michael 12 tahun lalu
induk
melakukan
33b6b8eef5
1 mengubah file dengan 2 tambahan dan 2 penghapusan
  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;
 begin
-  {$ifdef unix}
+{$if defined(FreeBSD) or defined(Linux)}
   FSocket.ReadFlags:=MSG_NOSIGNAL;
   FSocket.WriteFlags:=MSG_NOSIGNAL;
-  {$endif}
+{$endif}
 end;
 
 Procedure TFPHTTPConnection.InterPretHeader(ARequest : TFPHTTPConnectionRequest; Const AHeader : String);