diff --git a/Changelog.md b/Changelog.md
--- a/Changelog.md
+++ b/Changelog.md
@@ -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`.
diff --git a/net-mqtt.cabal b/net-mqtt.cabal
--- a/net-mqtt.cabal
+++ b/net-mqtt.cabal
@@ -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
diff --git a/src/Network/MQTT/Topic.hs b/src/Network/MQTT/Topic.hs
--- a/src/Network/MQTT/Topic.hs
+++ b/src/Network/MQTT/Topic.hs
@@ -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