fb 1.0.7 → 1.0.8

raw patch · 2 files changed

+15/−2 lines, 2 filesdep ~monad-controlPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: monad-control

API changes (from Hackage documentation)

Files

• fb.cabal +1/−1
• src/Facebook/Monad.hs +14/−1

@@ -1,5 +1,5 @@ name:              fb-version:           1.0.7+version:           1.0.8 license:           BSD3 license-file:      LICENSE author:            Felipe Lessa

@@ -1,4 +1,5 @@-{-# LANGUAGE DeriveDataTypeable,+{-# LANGUAGE CPP,+             DeriveDataTypeable,              FlexibleContexts,              FlexibleInstances,              GeneralizedNewtypeDeriving,@@ -60,14 +61,26 @@     liftBase = lift . liftBase  instance MonadTransControl (FacebookT auth) where+#if MIN_VERSION_monad_control(1,0,0)+    type StT (FacebookT auth) a = StT (ReaderT FbData) a+    liftWith f = F $ liftWith (\run -> f (run . unF))+    restoreT   = F . restoreT+#else     newtype StT (FacebookT auth) a = FbStT { unFbStT :: StT (ReaderT FbData) a }     liftWith f = F $ liftWith (\run -> f (liftM FbStT . run . unF))     restoreT   = F . restoreT . liftM unFbStT+#endif  instance MonadBaseControl b m => MonadBaseControl b (FacebookT auth m) where+#if MIN_VERSION_monad_control(1,0,0)+    type StM (FacebookT auth m) a = ComposeSt (FacebookT auth) m a+    liftBaseWith = defaultLiftBaseWith+    restoreM     = defaultRestoreM+#else     newtype StM (FacebookT auth m) a = StMT {unStMT :: ComposeSt (FacebookT auth) m a}     liftBaseWith = defaultLiftBaseWith StMT     restoreM     = defaultRestoreM   unStMT+#endif  -- | Since @fb-0.14.8@. instance MonadLogger m => MonadLogger (FacebookT auth m) where