diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -35,7 +35,7 @@
 
 * Relax various constraints
 
-## 0.4.1 -- 2022-04-22
+## 0.4.2 -- 2022-04-22
 
 * Add new datatype Result
 * Fix the following endpoints to produce 'Result' rather than NoContent
@@ -49,3 +49,8 @@
     * getZoneAxfr
     * rectifyZone
 * Improve compilation time by switching to TH for JSON instances
+
+## 0.4.3 -- 2023-09-19
+
+* Expose Result constructor
+* Relax various constraints
diff --git a/PowerDNS/API/Zones.hs b/PowerDNS/API/Zones.hs
--- a/PowerDNS/API/Zones.hs
+++ b/PowerDNS/API/Zones.hs
@@ -325,8 +325,8 @@
 
   } deriving Generic
 
-
-data Result = Result T.Text
+-- | A simple newtype wrapper, because the original PowerDNS API encodes some textual result types more equal than others.
+newtype Result = Result T.Text
 
 instance ToJSON Result where
   toJSON (Result t) = object ["result" .= t]
diff --git a/powerdns.cabal b/powerdns.cabal
--- a/powerdns.cabal
+++ b/powerdns.cabal
@@ -1,6 +1,6 @@
 cabal-version:      3.0
 name:               powerdns
-version:            0.4.2
+version:            0.4.3
 license:            BSD-3-Clause
 license-file:       LICENSE
 copyright:          (c) 2021 Victor Nawothnig
@@ -37,10 +37,10 @@
 
 common all
     build-depends:
-        base ^>= { 4.12, 4.13, 4.14, 4.15, 4.16 },
-        servant ^>= { 0.18.2, 0.19 },
-        servant-client ^>= { 0.18.2, 0.19 },
-        servant-client-core ^>= { 0.18.2, 0.19 }
+        base ^>= { 4.12, 4.13, 4.14, 4.15, 4.16, 4.17 },
+        servant ^>= { 0.18.2, 0.19, 0.20 },
+        servant-client ^>= { 0.18.2, 0.19, 0.20 },
+        servant-client-core ^>= { 0.18.2, 0.19, 0.20 }
 library
     import:           all
     exposed-modules:
@@ -57,13 +57,13 @@
     default-language: Haskell2010
     ghc-options:      -Wall -Wcompat
     build-depends:
-        aeson ^>= { 1.5.6, 2.0.3.0 },
+        aeson ^>= { 1.5.6, 2.0.3.0, 2.1.0.0, 2.2.0.0 },
         bytestring ^>= { 0.10.10, 0.11.0 },
         deepseq ^>= { 1.4.4 },
         containers ^>= { 0.6.2 },
-        hashable ^>= { 1.3.0.0 },
-        text ^>= { 1.2.4 },
-        time ^>= { 1.9.3 },
+        hashable ^>= { 1.3.0.0, 1.4.0.0 },
+        text ^>= { 1.2.4, 2.0, 2.1 },
+        time ^>= { 1.9.3, 1.10, 1.12  },
         base64-bytestring ^>= { 1.1.0, 1.2.1.0 },
         case-insensitive ^>= { 1.2.1 }
 
diff --git a/spec/Spec.hs b/spec/Spec.hs
--- a/spec/Spec.hs
+++ b/spec/Spec.hs
@@ -20,7 +20,7 @@
 
 {-# NOINLINE baseUrl #-}
 baseUrl :: BaseUrl
-baseUrl = unsafePerformIO (parseBaseUrl "pdns:8081")
+baseUrl = unsafePerformIO (parseBaseUrl "127.0.0.1:8081")
 
 envNoAuth :: ClientEnv
 envNoAuth = mkClientEnv mgr baseUrl
@@ -114,7 +114,6 @@
     assertEqual "list of zones" (Right []) r
 
     step "Done"
-
   where
     new = empty { zone_name   = Just "test.space."
                 , zone_kind   = Just Native