diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,10 @@
 # Revision history for influxdb
 
+## v1.7.1.4 - 2020-05-27
+
+* Relax upper version bound for aeson
+* Fix a GHC warning
+
 ## v1.7.1.3 - 2020-04-03
 
 * Relax upper version bound for base to support GHC 8.10.1
diff --git a/influxdb.cabal b/influxdb.cabal
--- a/influxdb.cabal
+++ b/influxdb.cabal
@@ -1,5 +1,5 @@
 name: influxdb
-version: 1.7.1.3
+version: 1.7.1.4
 synopsis: Haskell client library for InfluxDB
 description:
   @influxdb@ is an InfluxDB client library for Haskell.
@@ -76,7 +76,7 @@
   ghc-options: -Wall
   build-depends:
       base >= 4.9 && < 4.15
-    , aeson >= 0.7 && < 1.5
+    , aeson >= 0.7 && < 1.6
     , attoparsec < 0.14
     , bytestring >= 0.10 && < 0.11
     , clock >= 0.7 && < 0.9
diff --git a/src/Database/InfluxDB/Manage.hs b/src/Database/InfluxDB/Manage.hs
--- a/src/Database/InfluxDB/Manage.hs
+++ b/src/Database/InfluxDB/Manage.hs
@@ -95,9 +95,9 @@
 
 manageRequest :: QueryParams -> HC.Request
 manageRequest params = HC.defaultRequest
-  { HC.host = TE.encodeUtf8 $ params^.server.host
-  , HC.port = fromIntegral $ params^.server.port
-  , HC.secure = params^.server.ssl
+  { HC.host = TE.encodeUtf8 _host
+  , HC.port = fromIntegral _port
+  , HC.secure = _ssl
   , HC.method = "POST"
   , HC.path = "/query"
   }