hbeanstalk 0.2.1 → 0.2.2

raw patch · 2 files changed

+7/−10 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• Network/Beanstalk.hs +6/−9
• hbeanstalk.cabal +1/−1

@@ -701,17 +701,14 @@                           False -> 0        return (readyCount+reservedCount+delayedCount+buriedCount) --- Read up to and including a newline.  Any errors result in a string--- starting with "Error: "+-- Read up to and including a newline. readLine :: Socket -> IO B.ByteString readLine s =-    catch readLine' (\err -> return (B.pack $ "Error: " ++ show err))-        where-          readLine' = readline'' (fromByteString B.empty) >>= return . toByteString-              where readline'' b = do c <- recvBytes s 1-                                      if B.head c == '\n'-                                        then return     (b `mappend` fromByteString c)-                                        else readline'' (b `mappend` fromByteString c)+    readLine' (fromByteString B.empty) >>= return . toByteString+        where readLine' b = do c <- recvBytes s 1+                               if B.head c == '\n'+                                 then return    (b `mappend` fromByteString c)+                                 else readLine' (b `mappend` fromByteString c)  -- Parse response from watch/ignore command to determine how many -- tubes are currently being watched.

@@ -1,5 +1,5 @@ Name:           hbeanstalk-Version:        0.2.1+Version:        0.2.2 License:        BSD3 License-file:   LICENSE Cabal-Version: >= 1.6