diff --git a/hasql-cursor-transaction.cabal b/hasql-cursor-transaction.cabal
index 6adf378..e8c319b 100644
--- a/hasql-cursor-transaction.cabal
+++ b/hasql-cursor-transaction.cabal
@@ -33,6 +33,6 @@ library
     bytestring-tree-builder ==0.2.*,
     contravariant >=1.3 && <2,
     contravariant-extras >=0.3.3.1 && <0.4,
-    hasql >=1.3 && <1.4,
+    hasql >=1.4 && <1.5,
     hasql-transaction >=0.7 && <0.8,
     transformers >=0.4 && <0.6
diff --git a/library/Hasql/CursorTransaction/Private/Statements.hs b/library/Hasql/CursorTransaction/Private/Statements.hs
index 5d201ee..af6ef55 100644
--- a/library/Hasql/CursorTransaction/Private/Statements.hs
+++ b/library/Hasql/CursorTransaction/Private/Statements.hs
@@ -11,7 +11,7 @@ import qualified ByteString.TreeBuilder as D
 
 declareCursor :: ByteString -> ByteString -> B.Params a -> Statement a ()
 declareCursor name sql encoder =
-  Statement sql' encoder C.unit False
+  Statement sql' encoder C.noResult False
   where
     sql' =
       D.toByteString $
@@ -19,7 +19,7 @@ declareCursor name sql encoder =
 
 closeCursor :: ByteString -> Statement () ()
 closeCursor name =
-  Statement sql B.unit C.unit True
+  Statement sql B.noParams C.noResult True
   where
     sql =
       "CLOSE " <> name
@@ -32,4 +32,4 @@ fetchFromCursor name (F.BatchSize batchSize) decoder =
       D.toByteString $
       "FETCH FORWARD " <> D.asciiIntegral batchSize <> " FROM " <> D.byteString name
     encoder =
-      B.unit
+      B.noParams