diff --git a/LICENSE.markdown b/LICENSE.markdown
new file mode 100644
--- /dev/null
+++ b/LICENSE.markdown
@@ -0,0 +1,21 @@
+MIT License
+
+Copyright (c) 2023 Taylor Fausak
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in all
+copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+SOFTWARE.
diff --git a/LICENSE.txt b/LICENSE.txt
deleted file mode 100644
--- a/LICENSE.txt
+++ /dev/null
@@ -1,21 +0,0 @@
-MIT License
-
-Copyright (c) 2023 Taylor Fausak
-
-Permission is hereby granted, free of charge, to any person obtaining a copy
-of this software and associated documentation files (the "Software"), to deal
-in the Software without restriction, including without limitation the rights
-to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-copies of the Software, and to permit persons to whom the Software is
-furnished to do so, subject to the following conditions:
-
-The above copyright notice and this permission notice shall be included in all
-copies or substantial portions of the Software.
-
-THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
-SOFTWARE.
diff --git a/README.markdown b/README.markdown
--- a/README.markdown
+++ b/README.markdown
@@ -1,3 +1,7 @@
 # Patrol
 
+[![Workflow](https://github.com/tfausak/patrol/actions/workflows/workflow.yaml/badge.svg)](https://github.com/tfausak/patrol/actions/workflows/workflow.yaml)
+[![Hackage](https://img.shields.io/hackage/v/patrol)](https://hackage.haskell.org/package/patrol)
+[![Stackage](https://www.stackage.org/package/patrol/badge/nightly?label=stackage)](https://www.stackage.org/package/patrol)
+
 Patrol is a Sentry SDK for Haskell.
diff --git a/patrol.cabal b/patrol.cabal
--- a/patrol.cabal
+++ b/patrol.cabal
@@ -1,14 +1,14 @@
 cabal-version: 2.2
 
 name: patrol
-version: 1.0.0.0
+version: 1.0.0.1
 synopsis: Sentry SDK
 description: Patrol is a Sentry SDK.
 
 build-type: Simple
 category: Exceptions
 extra-source-files: CHANGELOG.markdown README.markdown
-license-file: LICENSE.txt
+license-file: LICENSE.markdown
 license: MIT
 maintainer: Taylor Fausak
 
@@ -31,7 +31,7 @@
     , http-client >= 0.7.13 && < 0.8
     , http-types >= 0.12.3 && < 0.13
     , network-uri >= 2.6.4 && < 2.7
-    , text >= 1.2.4 && < 1.3 || >= 2.0.1 && < 2.1
+    , text >= 1.2.5 && < 1.3 || >= 2.0.1 && < 2.1
     , time >= 1.9.3 && < 1.13
     , uuid >= 1.3.15 && < 1.4
   default-language: Haskell2010
diff --git a/source/library/Patrol/Extra/Aeson.hs b/source/library/Patrol/Extra/Aeson.hs
--- a/source/library/Patrol/Extra/Aeson.hs
+++ b/source/library/Patrol/Extra/Aeson.hs
@@ -16,5 +16,5 @@
   Aeson.String string -> Text.null string
   _ -> False
 
-pair :: Aeson.ToJSON a => String -> a -> Aeson.Pair
+pair :: (Aeson.ToJSON a) => String -> a -> Aeson.Pair
 pair = (Aeson..=) . Key.fromString
diff --git a/source/library/Patrol/Extra/List.hs b/source/library/Patrol/Extra/List.hs
--- a/source/library/Patrol/Extra/List.hs
+++ b/source/library/Patrol/Extra/List.hs
@@ -2,10 +2,10 @@
 
 import qualified Data.Function as Function
 
-insertAll :: Eq k => [(k, v)] -> [(k, v)] -> [(k, v)]
+insertAll :: (Eq k) => [(k, v)] -> [(k, v)] -> [(k, v)]
 insertAll = flip $ foldr insert
 
-insert :: Eq k => (k, v) -> [(k, v)] -> [(k, v)]
+insert :: (Eq k) => (k, v) -> [(k, v)] -> [(k, v)]
 insert = insertBy $ Function.on (==) fst
 
 insertBy :: (a -> a -> Bool) -> a -> [a] -> [a]
diff --git a/source/library/Patrol/Type/Dsn.hs b/source/library/Patrol/Type/Dsn.hs
--- a/source/library/Patrol/Type/Dsn.hs
+++ b/source/library/Patrol/Type/Dsn.hs
@@ -23,7 +23,7 @@
   }
   deriving (Eq, Show)
 
-fromUri :: Catch.MonadThrow m => Uri.URI -> m Dsn
+fromUri :: (Catch.MonadThrow m) => Uri.URI -> m Dsn
 fromUri uri = do
   theProtocol <- maybe (Catch.throwM $ Problem.Problem "invalid scheme") pure . Text.stripSuffix (Text.singleton ':') . Text.pack $ Uri.uriScheme uri
   uriAuth <- maybe (Catch.throwM $ Problem.Problem "missing authority") pure $ Uri.uriAuthority uri
diff --git a/source/library/Patrol/Type/Event.hs b/source/library/Patrol/Type/Event.hs
--- a/source/library/Patrol/Type/Event.hs
+++ b/source/library/Patrol/Type/Event.hs
@@ -129,7 +129,7 @@
       version = Text.empty
     }
 
-new :: IO.MonadIO io => io Event
+new :: (IO.MonadIO io) => io Event
 new = do
   theEventId <- EventId.random
   theTimestamp <- IO.liftIO Time.getCurrentTime
@@ -144,7 +144,7 @@
         version = Constant.sentryVersion
       }
 
-intoRequest :: Catch.MonadThrow m => Dsn.Dsn -> Event -> m Client.Request
+intoRequest :: (Catch.MonadThrow m) => Dsn.Dsn -> Event -> m Client.Request
 intoRequest dsn event = do
   theRequest <-
     Client.parseUrlThrow
diff --git a/source/library/Patrol/Type/EventId.hs b/source/library/Patrol/Type/EventId.hs
--- a/source/library/Patrol/Type/EventId.hs
+++ b/source/library/Patrol/Type/EventId.hs
@@ -33,7 +33,7 @@
 intoUuid :: EventId -> Uuid.UUID
 intoUuid (EventId uuid) = uuid
 
-random :: IO.MonadIO io => io EventId
+random :: (IO.MonadIO io) => io EventId
 random = IO.liftIO $ fmap fromUuid Uuid.nextRandom
 
 intoText :: EventId -> Text.Text
@@ -41,7 +41,7 @@
   let (lo, hi) = Uuid.toWords64 $ intoUuid eventId
    in Text.pack $ Printf.printf "%016x%016x" lo hi
 
-fromText :: Catch.MonadThrow m => Text.Text -> m EventId
+fromText :: (Catch.MonadThrow m) => Text.Text -> m EventId
 fromText t1 = do
   let parse :: (Catch.MonadThrow n, Integral a) => Int -> Text.Text -> n (a, Text.Text)
       parse size text = do