git.iko.soy/typeable/servant
on master help sign in
Small whitespace fix.
2934bacAndres Loeh
servant-server/src/Servant/Server/Internal/RoutingApplication.hs+1−1
compare with master
unifiedsplit
@@ -159,7 +159,7 @@ data Delayed :: * -> * where
159 -> Delayed c
159 -> Delayed c
160
160
161instance Functor Delayed where
161instance Functor Delayed where
162− fmap f (Delayed a b c g) = Delayed a b c ((fmap.fmap.fmap) f g)
162+ fmap f (Delayed a b c g) = Delayed a b c ((fmap . fmap . fmap) f g)
163
163
164-- | Add a capture to the end of the capture block.
164-- | Add a capture to the end of the capture block.
165addCapture :: Delayed (a -> b)
165addCapture :: Delayed (a -> b)