remove redundant pattern match
This commit is contained in:
parent
d350530091
commit
93d5951f11
1 changed files with 0 additions and 1 deletions
|
@ -378,5 +378,4 @@ matchHttpExceptionContent :: (HttpException -> Bool) -> HttpException -> Maybe H
|
||||||
matchHttpExceptionContent want e
|
matchHttpExceptionContent want e
|
||||||
| want e = Just e
|
| want e = Just e
|
||||||
| otherwise = Nothing
|
| otherwise = Nothing
|
||||||
matchHttpExceptionContent _ _ = Nothing
|
|
||||||
#endif
|
#endif
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue