diff --git a/CHANGELOG.md b/CHANGELOG.md index 5742643..0639dcb 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -1,10 +1,5 @@ # Changelog for `http-types` -## 0.13 [unreleased] - -* Add support for the QUERY method and Accept-Query response field name from - [RFC 10008](https://www.rfc-editor.org/rfc/rfc10008.html). - ## 0.12.7 [unreleased] * Add parsing and rendering functions for `Status` @@ -31,6 +26,7 @@ * `hForwarded` * `hLink` * `hStrictTransportSecurity` +* Add `hAcceptQuery` response field name from [RFC 10008](https://www.rfc-editor.org/rfc/rfc10008.html). ## 0.12.6 [2026-08-13] diff --git a/Network/HTTP/Types.hs b/Network/HTTP/Types.hs index 040910e..e1f54ae 100644 --- a/Network/HTTP/Types.hs +++ b/Network/HTTP/Types.hs @@ -14,7 +14,6 @@ module Network.HTTP.Types ( methodConnect, methodOptions, methodPatch, - methodQuery, StdMethod (..), -- ** Parsing and redering methods diff --git a/Network/HTTP/Types/Method.hs b/Network/HTTP/Types/Method.hs index 0fa8ab8..cecb06e 100644 --- a/Network/HTTP/Types/Method.hs +++ b/Network/HTTP/Types/Method.hs @@ -22,7 +22,6 @@ module Network.HTTP.Types.Method ( methodConnect, methodOptions, methodPatch, - methodQuery, -- ** Standard Methods @@ -90,16 +89,8 @@ methodOptions = renderStdMethod OPTIONS methodPatch :: Method methodPatch = renderStdMethod PATCH --- | QUERY Method as defined in --- . --- --- @since 0.13 -methodQuery :: Method -methodQuery = renderStdMethod QUERY - -- | HTTP standard method (as defined by RFC 2616, and PATCH which is defined --- by RFC 5789, and QUERY which is defined by --- ). +-- by RFC 5789). -- -- @since 0.2.0 data StdMethod @@ -113,11 +104,6 @@ data StdMethod | OPTIONS | -- | @since 0.8.0 PATCH - | -- | QUERY as defined in - -- . - -- - -- @since 0.13 - QUERY deriving ( Read , Show @@ -168,4 +154,3 @@ renderStdMethod method = CONNECT -> "CONNECT" OPTIONS -> "OPTIONS" PATCH -> "PATCH" - QUERY -> "QUERY" diff --git a/http-types.cabal b/http-types.cabal index f9b9782..2bdfbd7 100644 --- a/http-types.cabal +++ b/http-types.cabal @@ -24,7 +24,7 @@ Extra-doc-files: Source-repository this type: git location: https://github.com/Vlix/http-types.git - tag: v0.13.0 + tag: v0.12.7 Source-repository head type: git diff --git a/test/Network/HTTP/Types/MethodSpec.hs b/test/Network/HTTP/Types/MethodSpec.hs index 1eb4cd1..53c1c0e 100644 --- a/test/Network/HTTP/Types/MethodSpec.hs +++ b/test/Network/HTTP/Types/MethodSpec.hs @@ -24,7 +24,6 @@ spec = do it "CONNECT" $ methodConnect `shouldBe` "CONNECT" it "OPTIONS" $ methodOptions `shouldBe` "OPTIONS" it "PATCH " $ methodPatch `shouldBe` "PATCH" - it "QUERY " $ methodQuery `shouldBe` "QUERY" it "StdMethod has all constants" $ let methodList = [ methodGet @@ -36,13 +35,10 @@ spec = do , methodConnect , methodOptions , methodPatch - , methodQuery ] in allMethods `shouldBe` methodList describe "parse/render method" $ do - it "parses QUERY as a standard method" $ - parseMethod methodQuery `shouldBe` Right QUERY it "round trips" $ do renderMethod . parseMethod <$> allMethods `shouldBe` allMethods it "also round trips for any ByteString" $