diff --git a/pagerduty-hs.cabal b/pagerduty-hs.cabal
--- a/pagerduty-hs.cabal
+++ b/pagerduty-hs.cabal
@@ -5,7 +5,7 @@
 -- see: https://github.com/sol/hpack
 
 name:           pagerduty-hs
-version:        0.2.0.0
+version:        0.3.0.0
 synopsis:       An interface to the PagerDuty API.
 description:    Please see the README on GitHub at <https://github.com/dustin/pagerduty-hs#readme>
 category:       API
diff --git a/src/Network/API/PagerDuty/EventV1.hs b/src/Network/API/PagerDuty/EventV1.hs
--- a/src/Network/API/PagerDuty/EventV1.hs
+++ b/src/Network/API/PagerDuty/EventV1.hs
@@ -23,7 +23,7 @@
 import           Control.Monad.Catch    (MonadCatch (..), SomeException (..), catch)
 import           Control.Monad.IO.Class (MonadIO (..))
 import           Data.Aeson             (FromJSON (..), ToJSON (..), Value (..), encode, object, (.:), (.=))
-import           Data.Aeson.Types       (Pair, typeMismatch)
+import           Data.Aeson.Types       (Key, Pair, typeMismatch)
 import           Data.Char              (toLower)
 import           Data.Maybe             (mapMaybe)
 import           Data.Text              (Text, pack)
@@ -37,7 +37,7 @@
              | Image Text (Maybe Text) (Maybe Text) -- ^ Image URL, optional link ref, and optional alt text.
   deriving (Show, Eq)
 
-optj :: ToJSON v => [(Text, Maybe v)] -> [Pair]
+optj :: ToJSON v => [(Key, Maybe v)] -> [Pair]
 optj = mapMaybe (fmap (uncurry (.=)) . sequenceA)
 
 instance ToJSON Context where