git.iko.soy/typeable/servant
on master help sign in
Fixed unticked-promoted-constructors
bbc872eSimon Hafner
servant/src/Servant/API/ContentTypes.hs+1−1
@@ -185,7 +185,7 @@ instance OVERLAPPABLE_
185 lkup = fmap (\(a,b) -> (a, (fromStrict $ M.renderHeader a, b))) amrs
185 lkup = fmap (\(a,b) -> (a, (fromStrict $ M.renderHeader a, b))) amrs
186
186
187#if MIN_VERSION_base(4,9,0)
187#if MIN_VERSION_base(4,9,0)
188−instance TL.TypeError (TL.Text "No instance for (), use NoContent instead.")
188+instance TL.TypeError ('TL.Text "No instance for (), use NoContent instead.")
189 => AllCTRender '[] () where
189 => AllCTRender '[] () where
190 handleAcceptH _ _ _ = error "unreachable"
190 handleAcceptH _ _ _ = error "unreachable"
191#endif
191#endif