diff --git a/antiope-sns.cabal b/antiope-sns.cabal
--- a/antiope-sns.cabal
+++ b/antiope-sns.cabal
@@ -1,7 +1,7 @@
 cabal-version: 2.4
 
 name:                   antiope-sns
-version:                7.4.3
+version:                7.4.4
 synopsis:               Please see the README on Github at <https://github.com/arbor/antiope#readme>
 description:            Please see the README on Github at <https://github.com/arbor/antiope#readme>.
 category:               Services
@@ -12,6 +12,7 @@
 copyright:              Arbor Networks
 license:                MIT
 license-file:           LICENSE
+tested-with:            GHC == 8.8.1, GHC == 8.6.5, GHC == 8.4.4
 build-type:             Simple
 extra-source-files:     README.md
                         ChangeLog.md
@@ -61,7 +62,7 @@
                       , bytestring
                       , generic-lens
                       , hedgehog              >= 0.5          && < 1.1
-                      , hspec                 >= 2.4          && < 2.7
+                      , hspec                 >= 2.4          && < 2.8
                       , hw-hspec-hedgehog     >= 0.1          && < 0.3
                       , lens
                       , text
diff --git a/test/Antiope/SNS/MessagesSpec.hs b/test/Antiope/SNS/MessagesSpec.hs
--- a/test/Antiope/SNS/MessagesSpec.hs
+++ b/test/Antiope/SNS/MessagesSpec.hs
@@ -1,11 +1,9 @@
-module Antiope.SNS.MessagesSpec
-where
+module Antiope.SNS.MessagesSpec where
 
 import Antiope.SNS.Messages
 import Data.Aeson
 import Data.Time.Calendar
 import Data.Time.Clock
-
 import HaskellWorks.Hspec.Hedgehog
 import Hedgehog
 import Hedgehog.Gen                as Gen
@@ -44,6 +42,6 @@
   m <- Gen.int (Range.constant 1 12)
   d <- Gen.int (Range.constant 1 28)
   let day = fromGregorian y m d
-  secs <- toInteger <$> Gen.int (Range.constant 0 86401)
-  let diff = secondsToDiffTime secs
-  pure $ UTCTime day diff
+  secs <- toInteger <$> Gen.int (Range.constant 0 86400)
+  let diffTime = secondsToDiffTime secs
+  pure $ UTCTime day diffTime