net-mqtt 0.8.0.1 → 0.8.0.2

raw patch · 3 files changed

+4/−8 lines, 3 filesPVP: minor bump suggested

API additions: PVP suggests at least a minor version bump

API changes (from Hackage documentation)

+ Network.MQTT.Arbitrary: arbitraryFilter :: [Char] -> (Int, Int) -> (Int, Int) -> Gen Filter

Files

net-mqtt.cabal +2/−2
src/Network/MQTT/Arbitrary.hs +2/−2
test/Spec.hs +0/−4

net-mqtt.cabal view

@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: 5a165eeed76406b35cd868b291e467af93ca4b8ac8a9da0670c73f3c8999b4c6+-- hash: dcfcdd2f1a20a1390ddb1b704e80aaef402ac531570c44502ddfb47cd1ae85f4  name:           net-mqtt-version:        0.8.0.1+version:        0.8.0.2 synopsis:       An MQTT Protocol Implementation. description:    Please see the README on GitHub at <https://github.com/dustin/mqtt-hs#readme> category:       Network

src/Network/MQTT/Arbitrary.hs view

@@ -18,8 +18,8 @@ module Network.MQTT.Arbitrary (   SizeT(..),   MatchingTopic(..),-  arbitraryTopicSegment, arbitraryTopic, arbitraryMatchingTopic,-  v311mask+  arbitraryTopicSegment, arbitraryTopic, arbitraryFilter,+  arbitraryMatchingTopic, v311mask   ) where  import           Control.Applicative   (liftA2)

test/Spec.hs view

@@ -103,10 +103,6 @@   mapM_ (\q -> assertEqual (show q) (Just q) (qosFromInt (fromEnum q))) [QoS0 ..]   assertEqual "invalid QoS" Nothing (qosFromInt 1939) -instance Arbitrary Filter where-  arbitrary = ttof <$> arbitrary-    where ttof = fromString . T.unpack . unTopic- instance EqProp Filter where (=-=) = eq instance EqProp Topic where (=-=) = eq