diff --git a/src/Yesod/Auth/Facebook/ServerSide.hs b/src/Yesod/Auth/Facebook/ServerSide.hs
--- a/src/Yesod/Auth/Facebook/ServerSide.hs
+++ b/src/Yesod/Auth/Facebook/ServerSide.hs
@@ -129,8 +129,8 @@
 -- | Set the Facebook's user access token on the user's session.
 -- Usually you don't need to call this function, but it may
 -- become handy together with 'FB.extendUserAccessToken'.
-setUserAccessToken :: FB.UserAccessToken
-                   -> HandlerT site IO ()
+setUserAccessToken :: MonadHandler m => FB.UserAccessToken
+                   -> m ()
 setUserAccessToken (FB.UserAccessToken (FB.Id userId) data_ exptime) = do
   setSession "_FBID" userId
   setSession "_FBAT" data_
@@ -142,7 +142,7 @@
 -- is not logged in via @yesod-auth-fb@).  Note that the returned
 -- access token may have expired, we recommend using
 -- 'FB.hasExpired' and 'FB.isValid'.
-getUserAccessToken :: HandlerT site IO (Maybe FB.UserAccessToken)
+getUserAccessToken :: MonadHandler m => m (Maybe FB.UserAccessToken)
 getUserAccessToken = runMaybeT $ do
   userId  <- MaybeT $ lookupSession "_FBID"
   data_   <- MaybeT $ lookupSession "_FBAT"
@@ -152,7 +152,7 @@
 
 -- | Delete Facebook's user access token from the session.  /Do/
 -- /not use/ this function unless you know what you're doing.
-deleteUserAccessToken :: HandlerT site IO ()
+deleteUserAccessToken :: MonadHandler m => m ()
 deleteUserAccessToken = do
   deleteSession "_FBID"
   deleteSession "_FBAT"
diff --git a/yesod-auth-fb.cabal b/yesod-auth-fb.cabal
--- a/yesod-auth-fb.cabal
+++ b/yesod-auth-fb.cabal
@@ -1,5 +1,5 @@
 Name:                yesod-auth-fb
-Version:             1.6.6
+Version:             1.7
 Synopsis:            Authentication backend for Yesod using Facebook.
 Homepage:            https://github.com/prowdsponsor/yesod-auth-fb
 License:             BSD3