fb 0.11.2 → 0.11.2.1
raw patch · 2 files changed
+9/−3 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- fb.cabal +1/−1
- src/Facebook/RealTime.hs +8/−2
fb.cabal view
@@ -1,5 +1,5 @@ name: fb-version: 0.11.2+version: 0.11.2.1 license: BSD3 license-file: LICENSE author: Felipe Lessa
src/Facebook/RealTime.hs view
@@ -15,7 +15,7 @@ import Control.Applicative ((<$>), (<*>)) import Control.Monad.Trans.Control (MonadBaseControl)-import Control.Monad (liftM, mzero)+import Control.Monad (liftM, mzero, void) import Data.ByteString.Char8 (ByteString) import Data.Text (Text) import Data.Typeable (Typeable)@@ -29,9 +29,12 @@ import qualified Data.ByteString.Lazy.Char8 as L import qualified Data.Conduit as C import qualified Data.Text.Encoding as TE+import qualified Network.HTTP.Conduit as H+import qualified Network.HTTP.Types as HT import Facebook.Types import Facebook.Monad+import Facebook.Base import Facebook.Graph import Facebook.OpenGraph @@ -108,7 +111,10 @@ , "callback_url" #= callbackUrl , "verify_token" #= verifyToken ]- postObject path args apptoken+ runResourceInFb $ do+ req <- fbreq path (Just apptoken) args+ void $ fbhttp req { H.method = HT.methodPost }+ return () -- | (Internal) Get the subscription's path.