From 4bc4fc3b368186455939d8efe4ae13a223cbcfa0 Mon Sep 17 00:00:00 2001 From: Eric Easley Date: Sun, 7 Feb 2016 19:17:50 -0800 Subject: [PATCH] Adjust yesod-auth for split DB --- yesod-auth/Yesod/Auth.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/yesod-auth/Yesod/Auth.hs b/yesod-auth/Yesod/Auth.hs index db9e7331..70ecde59 100644 --- a/yesod-auth/Yesod/Auth.hs +++ b/yesod-auth/Yesod/Auth.hs @@ -500,10 +500,10 @@ class (YesodAuth master, YesodPersist master) => YesodAuthPersist master where getAuthEntity :: AuthId master -> HandlerT master IO (Maybe (AuthEntity master)) default getAuthEntity - :: ( YesodPersistBackend master - ~ PersistEntityBackend (AuthEntity master) + :: ( YesodPersistBackend master ~ backend + , BaseBackend backend ~ PersistEntityBackend (AuthEntity master) , Key (AuthEntity master) ~ AuthId master - , PersistStore (YesodPersistBackend master) + , PersistStore backend , PersistEntity (AuthEntity master) ) => AuthId master -> HandlerT master IO (Maybe (AuthEntity master))