mirror of
https://github.com/rejetto/hfs2.git
synced 2025-12-19 10:03:56 +01:00
fix: switching off the server was not stopping the IPv6 part
This commit is contained in:
parent
dd0fc4e448
commit
0f720b8a25
@ -690,8 +690,9 @@ end; // start
|
|||||||
|
|
||||||
procedure ThttpSrv.stop();
|
procedure ThttpSrv.stop();
|
||||||
begin
|
begin
|
||||||
if assigned(sock) then
|
if sock = NIL then exit;
|
||||||
try sock.Close() except end;
|
try sock.Close() except end;
|
||||||
|
try sock.multiListenSockets.clear() except end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure ThttpSrv.connected(Sender: TObject; Error: Word);
|
procedure ThttpSrv.connected(Sender: TObject; Error: Word);
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user