eeva/servant
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Remove 'Show' instance for RouteMismatch

Browse source
This commit is contained in:
aaron levin 2015-08-10 13:31:11 -04:00 committed by Arian van Putten
parent 6906b553fb
commit 9aaf426be0
1 changed files with 0 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
servant-server/src/Servant/Server/Internal/RoutingApplication.hs
View file

@ -54,9 +54,6 @@ data RouteMismatch =
| HttpError Status [Header] (Maybe BL.ByteString) -- ^ an even even more informative arbitrary HTTP response code error. | HttpError Status [Header] (Maybe BL.ByteString) -- ^ an even even more informative arbitrary HTTP response code error.
| RouteMismatch Response -- ^ an arbitrary mismatch with custom Response. | RouteMismatch Response -- ^ an arbitrary mismatch with custom Response.
instance Show RouteMismatch where
show = const "hello"
-- | specialized 'Less Than' for use with Monoid RouteMismatch -- | specialized 'Less Than' for use with Monoid RouteMismatch
(<=:) :: RouteMismatch -> RouteMismatch -> Bool (<=:) :: RouteMismatch -> RouteMismatch -> Bool
{-# INLINE (<=:) #-} {-# INLINE (<=:) #-}