fix build with old version of http-client
This commit is contained in:
parent
5f84a102ee
commit
e5a404ebe2
1 changed files with 1 additions and 1 deletions
|
@ -424,7 +424,7 @@ matchStatusCodeHeadersException :: (Status -> ResponseHeaders -> Bool) -> HttpEx
|
|||
matchStatusCodeHeadersException want e@(StatusCodeException s r _)
|
||||
| want s r = Just e
|
||||
| otherwise = Nothing
|
||||
matchStatusCodeException _ _ = Nothing
|
||||
matchStatusCodeHeadersException _ _ = Nothing
|
||||
#endif
|
||||
|
||||
#if MIN_VERSION_http_client(0,5,0)
|
||||
|
|
Loading…
Add table
Reference in a new issue