From d438e42a8047c3ea37ec2f0eaa8010fb22fc21d6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Thu, 17 Jul 2025 21:39:22 +0200
Subject: Destroy ICE and close WS sessions on connection termination

---
 src/Erebos/ICE.chs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/Erebos/ICE.chs')

diff --git a/src/Erebos/ICE.chs b/src/Erebos/ICE.chs
index bed186b..a3dd9bc 100644
--- a/src/Erebos/ICE.chs
+++ b/src/Erebos/ICE.chs
@@ -66,6 +66,7 @@ instance Show IceSession where
 
 instance PeerAddressType IceSession where
     sendBytesToAddress = iceSend
+    connectionToAddressClosed = iceDestroy
 
 
 data IceRemoteInfo = IceRemoteInfo
-- 
cgit v1.2.3