From c9db52bf61b2acb6ea6dc74f71a6303c8c9b312a Mon Sep 17 00:00:00 2001 From: Yuji Yamamoto Date: Tue, 26 Dec 2017 16:38:30 +0900 Subject: [PATCH] Add hlint rules to prevent regression of #3628 Related: https://github.com/commercialhaskell/stack/issues/3700 --- .hlint.yaml | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/.hlint.yaml b/.hlint.yaml index 1eba17f0eb..ddd2277f66 100644 --- a/.hlint.yaml +++ b/.hlint.yaml @@ -44,3 +44,13 @@ - error: {lhs: "fromString . toFilePath", rhs: "display"} - ignore: {name: "Use display", within: "warnMultiple"} - ignore: {name: "Use display", within: "Stack.PrettyPrint"} + +- error: {lhs: "Network.HTTP.Simple.httpJSON", rhs: "Network.HTTP.StackClient.httpJSON"} +- error: {lhs: "Network.HTTP.Simple.httpLbs", rhs: "Network.HTTP.StackClient.httpLbs"} +- error: {lhs: "Network.HTTP.Simple.httpLBS", rhs: "Network.HTTP.StackClient.httpLBS"} +- error: {lhs: "Network.HTTP.Simple.httpSink", rhs: "Network.HTTP.StackClient.httpSink"} +- error: {lhs: "Network.HTTP.Simple.httpNoBody", rhs: "Network.HTTP.StackClient.httpNoBody"} +- error: {lhs: "Network.HTTP.Simple.withResponse", rhs: "Network.HTTP.StackClient.withResponse"} +- error: {lhs: "Network.HTTP.Client.withResponse", rhs: "Network.HTTP.StackClient.withResponseByManager"} +- ignore: {name: "Use alternative", within: "Network.HTTP.StackClient"} +- ignore: {name: "Use withResponseByManager", within: "Network.HTTP.StackClient"}