feat(tc): fix unit tests

veepee-oss · Jan 23, 2021 · f4c1d80 · f4c1d80
1 parent 5a1bd7d
commit f4c1d80
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/Vp.FSharp.Sql.Tests/Mocks.fs b/Vp.FSharp.Sql.Tests/Mocks.fs
@@ -5,6 +5,7 @@ open System
 open System.Data
 open System.Data.Common
 
+open System.Threading.Tasks
 open Vp.FSharp.Sql
 
 
@@ -45,6 +46,8 @@ let fakeData values columns =
 
 let makeDeps (valToParam: (string -> 'DbType -> 'DbParameter) option)  =
     { CreateCommand = (fun connection -> connection.CreateCommand())
+      SetCommandTransaction = (fun command transaction -> command.Transaction <- transaction)
+      BeginTransactionAsync = (fun _ _ _ -> ValueTask.FromResult null)
       ExecuteReaderAsync = (fun cmd -> cmd.ExecuteReaderAsync)
       DbValueToParameter = valToParam |> Option.defaultValue (fun _ _ -> failwith "") }