diff --git a/pinboard.cabal b/pinboard.cabal
--- a/pinboard.cabal
+++ b/pinboard.cabal
@@ -3,7 +3,7 @@
 -- see: https://github.com/sol/hpack
 
 name:           pinboard
-version:        0.9.12.2
+version:        0.9.12.3
 synopsis:       Access to the Pinboard API
 description:    .
                 The Pinboard API is a way to interact programatically with
diff --git a/src/Pinboard/ApiTypes.hs b/src/Pinboard/ApiTypes.hs
--- a/src/Pinboard/ApiTypes.hs
+++ b/src/Pinboard/ApiTypes.hs
@@ -4,6 +4,7 @@
 {-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE RecordWildCards #-}
 {-# LANGUAGE ScopedTypeVariables #-}
+{-# LANGUAGE CPP #-}
 
 -- |
 -- Module      : Pinboard.ApiTypes
@@ -23,7 +24,9 @@
 import GHC.Generics (Generic)
 
 import qualified Data.HashMap.Strict as HM
+#if !MIN_VERSION_aeson(1,1,0)
 import qualified Data.Vector as V
+#endif
 import Data.Time.Format (formatTime, defaultTimeLocale)
 import Control.Applicative
 import Prelude hiding (words, unwords)
@@ -231,8 +234,10 @@
     | otherwise = fail "bad parse"
   parseJSON _ = fail "bad parse"
 
+#if !MIN_VERSION_aeson(1,1,0)
 instance ToJSON [Suggested] where
   toJSON xs = Array $ toJSON <$> V.fromList xs
+#endif
 
 instance ToJSON Suggested where
   toJSON (Popular tags) = object ["popular" .= toJSON tags]
diff --git a/src/Pinboard/Client.hs b/src/Pinboard/Client.hs
--- a/src/Pinboard/Client.hs
+++ b/src/Pinboard/Client.hs
@@ -75,6 +75,9 @@
 import Pinboard.Util as X
 import Pinboard.Logging as X
 
+import Paths_pinboard (version)
+import Data.Version (showVersion)
+
 import qualified Data.ByteString.Lazy as LBS
 import qualified Data.Text as T
 import qualified Data.Text.Encoding as T
@@ -215,7 +218,7 @@
   return $
     setRequestIgnoreStatus $
     req
-    { requestHeaders = [("User-Agent", "pinboard.hs/0.9.12.2")]
+    { requestHeaders = [("User-Agent", "pinboard.hs/" <> pack (showVersion version))]
     }
 
 --------------------------------------------------------------------------------