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

Small whitespace fix.

Browse source
This commit is contained in:
Andres Loeh 2016-01-28 11:07:59 +01:00
parent c532ecffd5
commit 2934bac40c
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -159,7 +159,7 @@ data Delayed :: * -> * where
-> Delayed c
instance Functor Delayed where
fmap f (Delayed a b c g) = Delayed a b c ((fmap.fmap.fmap) f g)
fmap f (Delayed a b c g) = Delayed a b c ((fmap . fmap . fmap) f g)
-- | Add a capture to the end of the capture block.
addCapture :: Delayed (a -> b)