diff --git a/lib/Database/PostgreSQL/Opium.hs b/lib/Database/PostgreSQL/Opium.hs
index c2273c1..c9146a1 100644
--- a/lib/Database/PostgreSQL/Opium.hs
+++ b/lib/Database/PostgreSQL/Opium.hs
@@ -27,6 +27,7 @@ module Database.PostgreSQL.Opium
   )
   where
 
+import Control.Monad (void)
 import Control.Monad.IO.Class (liftIO)
 import Control.Monad.Trans.Except (ExceptT (..), except, runExceptT)
 import Data.Proxy (Proxy (..))
@@ -67,9 +68,7 @@ execute
   -> Text
   -> a
   -> IO (Either Error ())
-execute conn query params = runExceptT $ do
-  _ <- execParams conn query params
-  pure ()
+execute conn query params = runExceptT $ void $ execParams conn query params
 
 execute_ :: Connection -> Text -> IO (Either Error ())
 execute_ conn query = execute conn query ()