diff --git a/src/Database/Redis/Sentinel.hs b/src/Database/Redis/Sentinel.hs index d3a4f0d8..8c15b3c5 100644 --- a/src/Database/Redis/Sentinel.hs +++ b/src/Database/Redis/Sentinel.hs @@ -46,6 +46,7 @@ import Control.Exception (Exception, IOException, evaluate, throwI import Control.Monad import Control.Monad.Catch (Handler (..), MonadCatch, catches, throwM) import Control.Monad.Except +import Control.Monad.IO.Class(MonadIO(liftIO)) import Data.ByteString (ByteString) import qualified Data.ByteString as BS import qualified Data.ByteString.Char8 as BS8