mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-16 08:00:52 +02:00
+ Changed mode to output for file sockets
This commit is contained in:
parent
3e874e373e
commit
20c89903ec
@ -105,7 +105,7 @@ begin
|
||||
FileRec(SockOut).Handle:=Sock;
|
||||
FileRec(SockOut).RecSize:=1;
|
||||
FileRec(SockOut).userdata[1]:=S_OUT;
|
||||
FileRec(SockOut).Mode := fmAppend;
|
||||
FileRec(SockOut).Mode := fmOutput;
|
||||
end;
|
||||
|
||||
{******************************************************************************
|
||||
@ -172,7 +172,10 @@ begin
|
||||
end;
|
||||
{
|
||||
$Log$
|
||||
Revision 1.10 2003-11-22 21:58:09 marco
|
||||
Revision 1.11 2003-11-23 10:57:15 michael
|
||||
+ Changed mode to output for file sockets
|
||||
|
||||
Revision 1.10 2003/11/22 21:58:09 marco
|
||||
* johill changed his mind
|
||||
|
||||
Revision 1.9 2003/11/22 10:59:58 marco
|
||||
|
Loading…
Reference in New Issue
Block a user