From 07cc222c4d78526e210db5779ff776c4e058f44c Mon Sep 17 00:00:00 2001 From: Kei Hibino Date: Fri, 9 Sep 2016 14:39:16 +0900 Subject: [PATCH] update haddock. --- HDBC-session/src/Database/HDBC/Session.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/HDBC-session/src/Database/HDBC/Session.hs b/HDBC-session/src/Database/HDBC/Session.hs index 90bdb5d4..f157c1cb 100644 --- a/HDBC-session/src/Database/HDBC/Session.hs +++ b/HDBC-session/src/Database/HDBC/Session.hs @@ -82,6 +82,7 @@ withConnectionIO = withConnection bracket id -- | Same as 'withConnectionIO' other than issuing commit at the end of transaction body. -- In other words, the transaction with no exception is committed. +-- Handy defintion for simple transactions. withConnectionCommit :: IConnection conn => IO conn -- ^ Connect action -> (conn -> IO a) -- ^ Transaction body