phone-push 0.1.0 → 0.1.1

raw patch · 2 files changed

+3/−3 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

phone-push.cabal +1/−1
src/IOS.hs +2/−2

phone-push.cabal view

@@ -1,5 +1,5 @@ name:             phone-push-version:          0.1.0+version:          0.1.1 copyright:        (c) 2013 David Fendrich license:          BSD3 license-file:     LICENSE

src/IOS.hs view

@@ -23,7 +23,7 @@ Sandbox choice -}   -pushMess:: FilePath -> FilePath -> BL.ByteString -> [B.ByteString] -> IO ()  +pushMess :: FilePath -> FilePath -> BL.ByteString -> [B.ByteString] -> IO ()   pushMess keyfile certfile payload tokens = withOpenSSL $ do   -- Prepare SSL context   ssl <- context@@ -34,7 +34,7 @@    -- Open socket   proto <- (getProtocolNumber "tcp")-  he <- getHostByName "gateway.sandbox.push.apple.com"+  he <- getHostByName "gateway.push.apple.com"   sock <- socket AF_INET Stream proto   Network.Socket.connect sock (SockAddrInet 2195 (hostAddress he))