From d556fc8844de35aa34ae7945e42a0576185ae887 Mon Sep 17 00:00:00 2001 From: Mikkel Christiansen Date: Wed, 26 Aug 2015 15:26:35 +0200 Subject: [PATCH] Replace deprecated Connection type. --- yesod-persistent/Yesod/Persist/Core.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/yesod-persistent/Yesod/Persist/Core.hs b/yesod-persistent/Yesod/Persist/Core.hs index b40cd72a..c5667073 100644 --- a/yesod-persistent/Yesod/Persist/Core.hs +++ b/yesod-persistent/Yesod/Persist/Core.hs @@ -81,7 +81,7 @@ newtype DBRunner site = DBRunner -- -- Since 1.2.0 defaultGetDBRunner :: YesodPersistBackend site ~ SQL.SqlBackend - => (site -> Pool SQL.Connection) + => (site -> Pool SQL.SqlBackend) -> HandlerT site IO (DBRunner site, HandlerT site IO ()) defaultGetDBRunner getPool = do pool <- fmap getPool getYesod