From 625318b7ef38257523751ae2df3b047bb64b77c2 Mon Sep 17 00:00:00 2001 From: Kerry Perret Date: Sat, 23 Jan 2021 08:57:49 +0100 Subject: [PATCH] fix(tc): add missing parameter --- Vp.FSharp.Sql/Transaction.fs | 24 ++++++++---------------- 1 file changed, 8 insertions(+), 16 deletions(-) diff --git a/Vp.FSharp.Sql/Transaction.fs b/Vp.FSharp.Sql/Transaction.fs index e2028e6..3ca7f38 100644 --- a/Vp.FSharp.Sql/Transaction.fs +++ b/Vp.FSharp.Sql/Transaction.fs @@ -85,22 +85,14 @@ let commitOnOk cancellationToken isolationLevel DbConnection.closedIfClosed wasClosed connection } -let defaultCommit connection - (beginTransaction: #DbConnection -> 'IsolationLevel -> CancellationToken -> ValueTask<#DbTransaction>) - body = - commit CancellationToken.None DefaultIsolationLevel connection body +let defaultCommit connection beginTransaction body = + commit CancellationToken.None DefaultIsolationLevel connection beginTransaction body -let defaultNotCommit connection - (beginTransaction: #DbConnection -> 'IsolationLevel -> CancellationToken -> ValueTask<#DbTransaction>) - body = - notCommit CancellationToken.None DefaultIsolationLevel connection body +let defaultNotCommit connection beginTransaction body = + notCommit CancellationToken.None DefaultIsolationLevel connection beginTransaction body -let defaultCommitOnSome connection - (beginTransaction: #DbConnection -> 'IsolationLevel -> CancellationToken -> ValueTask<#DbTransaction>) - body = - commitOnSome CancellationToken.None DefaultIsolationLevel connection body +let defaultCommitOnSome connection beginTransaction body = + commitOnSome CancellationToken.None DefaultIsolationLevel connection beginTransaction body -let defaultCommitOnOk connection - (beginTransaction: #DbConnection -> 'IsolationLevel -> CancellationToken -> ValueTask<#DbTransaction>) - body = - commitOnOk CancellationToken.None DefaultIsolationLevel connection body +let defaultCommitOnOk connection beginTransaction body = + commitOnOk CancellationToken.None DefaultIsolationLevel connection beginTransaction body