diff --git a/relational-query-HDBC.cabal b/relational-query-HDBC.cabal
--- a/relational-query-HDBC.cabal
+++ b/relational-query-HDBC.cabal
@@ -1,5 +1,5 @@
 name:                relational-query-HDBC
-version:             0.2.0.1
+version:             0.2.0.2
 synopsis:            HDBC instance of relational-query and typed query interface for HDBC
 description:         This package contains the HDBC instance of relational-query and
                      the typed query interface for HDBC.
@@ -50,7 +50,7 @@
 
                        , names-th
                        , persistable-record
-                       , relational-query >= 0.6.1
+                       , relational-query >= 0.6.2
                        , relational-schemas
                        , HDBC >=2
                        , HDBC-session
diff --git a/src/Database/HDBC/Record/Insert.hs b/src/Database/HDBC/Record/Insert.hs
--- a/src/Database/HDBC/Record/Insert.hs
+++ b/src/Database/HDBC/Record/Insert.hs
@@ -85,6 +85,7 @@
       (c, tl) = splitAt n xs
 
 -- | Prepare and insert with chunk insert statement. Result is insert action list.
+{-# DEPRECATED chunksInsertActions "Difficult to release around prepared statement resources." #-}
 chunksInsertActions :: (IConnection conn, ToSql SqlValue a)
                     => conn
                     -> Insert a
diff --git a/src/Database/HDBC/Record/InsertQuery.hs b/src/Database/HDBC/Record/InsertQuery.hs
--- a/src/Database/HDBC/Record/InsertQuery.hs
+++ b/src/Database/HDBC/Record/InsertQuery.hs
@@ -19,11 +19,11 @@
 
 import Database.HDBC (IConnection, SqlValue)
 
-import Database.Relational.Query (InsertQuery, untypeInsertQuery)
+import Database.Relational.Query (InsertQuery)
 import Database.Record (ToSql)
 
 import Database.HDBC.Record.Statement
-  (unsafePrepare, PreparedStatement, runPreparedNoFetch)
+  (prepareNoFetch, PreparedStatement, runPreparedNoFetch)
 
 -- | Typed prepared insert query type.
 type PreparedInsertQuery p = PreparedStatement p ()
@@ -33,7 +33,7 @@
         => conn
         -> InsertQuery p
         -> IO (PreparedInsertQuery p)
-prepare conn = unsafePrepare conn . untypeInsertQuery
+prepare = prepareNoFetch
 
 -- | Same as 'prepare'.
 prepareInsertQuery :: IConnection conn
