Small whitespace fix.
commit2934bac40c5d2b54c59f3531732e039c9c9393ee
authorAndres Loeh <andres@well-typed.com>
dateThu 28 Jan 2016, 11:07 (11 years ago)
parentc532ecf
servant-server/src/Servant/Server/Internal/RoutingApplication.hs+1−1
@@ -159,7 +159,7 @@ data Delayed :: * -> * where
159159 -> Delayed c
160160
161161instance 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)
163163
164164-- | Add a capture to the end of the capture block.
165165addCapture :: Delayed (a -> b)