From 83d291f476a9793012a7aabb27c3cf59c7bdea05 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Tue, 11 Mar 2025 20:22:33 +0100
Subject: Generic type for MonadError constraints

Changelog: API: MonadError constraints use generic error type
---
 src/Erebos/ICE.chs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

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

diff --git a/src/Erebos/ICE.chs b/src/Erebos/ICE.chs
index e0b1b34..06edecf 100644
--- a/src/Erebos/ICE.chs
+++ b/src/Erebos/ICE.chs
@@ -21,7 +21,6 @@ module Erebos.ICE (
 import Control.Arrow
 import Control.Concurrent.MVar
 import Control.Monad
-import Control.Monad.Except
 import Control.Monad.Identity
 
 import Data.ByteString (ByteString, packCStringLen, useAsCString)
@@ -118,7 +117,7 @@ instance StorableText IceCandidate where
                 , icandPort = port
                 , icandType = ctype
                 }
-        _ -> throwError "failed to parse candidate"
+        _ -> throwOtherError "failed to parse candidate"
 
 
 {#enum pj_ice_sess_role as IceSessionRole {underscoreToCase} deriving (Show, Eq) #}
-- 
cgit v1.2.3