From cd01d280f42838e5ca7df2fb1374764c0d477036 Mon Sep 17 00:00:00 2001 From: Orion Kindel Date: Tue, 25 Jun 2024 14:36:01 -0500 Subject: [PATCH] fix: unused constraint --- src/Pipes.Postgres.purs | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/src/Pipes.Postgres.purs b/src/Pipes.Postgres.purs index 69a263e..a9cd86f 100644 --- a/src/Pipes.Postgres.purs +++ b/src/Pipes.Postgres.purs @@ -6,11 +6,10 @@ import Control.Monad.Cont (lift) import Control.Monad.Error.Class (class MonadError, class MonadThrow, catchError, throwError) import Control.Monad.Morph (hoist) import Control.Monad.Postgres (PostgresT) -import Control.Monad.Reader (class MonadAsk, ask) +import Control.Monad.Reader (ask) import Data.Maybe (Maybe(..)) import Effect.Aff.Class (class MonadAff, liftAff) import Effect.Aff.Postgres.Client as Client -import Effect.Aff.Postgres.Pool (Pool) import Effect.Aff.Postgres.Pool as Pool import Effect.Class (liftEffect) import Effect.Exception (Error) @@ -26,7 +25,6 @@ stdin :: forall m . MonadAff m => MonadError Error m - => MonadAsk Pool m => String -> Consumer (Maybe Buffer) (PostgresT m) Unit stdin q = do