net-mqtt 0.8.0.2 → 0.8.1.0
raw patch · 3 files changed
+20/−8 lines, 3 filesdep ~deepseqPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: deepseq
API changes (from Hackage documentation)
+ Network.MQTT.Topic: toFilter :: Topic -> Filter
Files
- Changelog.md +10/−0
- net-mqtt.cabal +5/−7
- src/Network/MQTT/Topic.hs +5/−1
Changelog.md view
@@ -1,5 +1,15 @@ # Changelog for net-mqtt +## 0.8.1.0++Added `toFilter` to convert `Topic`s to `Filter`s.++(Thanks Matt Friede)++## 0.8.0.2++Exported `arbitraryFilter` for more control over filter creation.+ ## 0.8.0.1 Added an `Arbitrary` instance for `Filter`.
net-mqtt.cabal view
@@ -3,11 +3,9 @@ -- This file has been generated from package.yaml by hpack version 0.34.4. -- -- see: https://github.com/sol/hpack------ hash: dcfcdd2f1a20a1390ddb1b704e80aaef402ac531570c44502ddfb47cd1ae85f4 name: net-mqtt-version: 0.8.0.2+version: 0.8.1.0 synopsis: An MQTT Protocol Implementation. description: Please see the README on GitHub at <https://github.com/dustin/mqtt-hs#readme> category: Network@@ -50,7 +48,7 @@ , conduit-extra >=1.3.0 && <1.4 , connection >=0.2.0 && <0.4 , containers >=0.5.0 && <0.7- , deepseq >=1.4.4.0 && <1.5+ , deepseq >=1.4.3.0 && <1.5 , network-conduit-tls >=1.3.2 && <1.4 , network-uri >=2.6.1 && <2.7 , stm >=2.4.0 && <2.6@@ -77,7 +75,7 @@ , conduit-extra >=1.3.0 && <1.4 , connection >=0.2.0 && <0.4 , containers >=0.5.0 && <0.7- , deepseq >=1.4.4.0 && <1.5+ , deepseq >=1.4.3.0 && <1.5 , net-mqtt , network-conduit-tls >=1.3.2 && <1.4 , network-uri >=2.6.1 && <2.7@@ -105,7 +103,7 @@ , conduit-extra >=1.3.0 && <1.4 , connection >=0.2.0 && <0.4 , containers >=0.5.0 && <0.7- , deepseq >=1.4.4.0 && <1.5+ , deepseq >=1.4.3.0 && <1.5 , net-mqtt , network-conduit-tls >=1.3.2 && <1.4 , network-uri >=2.6.1 && <2.7@@ -137,7 +135,7 @@ , conduit-extra >=1.3.0 && <1.4 , connection >=0.2.0 && <0.4 , containers >=0.5.0 && <0.7- , deepseq >=1.4.4.0 && <1.5+ , deepseq >=1.4.3.0 && <1.5 , net-mqtt , network-conduit-tls >=1.3.2 && <1.4 , network-uri >=2.6.1 && <2.7
src/Network/MQTT/Topic.hs view
@@ -14,7 +14,7 @@ module Network.MQTT.Topic ( Filter, unFilter, Topic, unTopic, match,- mkFilter, mkTopic, split+ mkFilter, mkTopic, split, toFilter ) where import Data.String (IsString (..))@@ -77,3 +77,7 @@ | p == t = cmp ps ts | p == "+" && not ("$" `isPrefixOf` t) = cmp ps ts | otherwise = False++-- | Convert a 'Topic' to a 'Filter' as all 'Topic's are valid 'Filter's+toFilter :: Topic -> Filter+toFilter (Topic t) = Filter t