git.iko.soy/typeable/servant
on master help sign in
remove tabs
commite3c3ba2aeb8f1152792804c3bf015282ceb43e33 authorAlp Mestanogullari <alpmestan@gmail.com> dateThu 18 Jun 2015, 13:09 (11 years ago) parent76b21f7
1 file changed+2−2
servant/src/Servant/Utils/Links.hs+2−2
servant/src/Servant/Utils/Links.hs+2−2
@@ -340,8 +340,8 @@ instance (ToText v, HasLink sub)
340340 addSegment (escape . unpack $ toText v) l
341341
342342instance HasLink sub => HasLink (Header sym a :> sub) where
343− type MkLink (Header sym a :> sub) = MkLink sub
344− toLink _ = toLink (Proxy :: Proxy sub)
343+ type MkLink (Header sym a :> sub) = MkLink sub
344+ toLink _ = toLink (Proxy :: Proxy sub)
345345
346346-- Verb (terminal) instances
347347instance HasLink (Get y r) where