git.iko.soy/servant
on master help sign in
Review fix
commit81c358962498a76b02bd3a45389761726be85d9c authorJulian K. Arni <jkarni@gmail.com> dateTue 24 Feb 2015, 14:05 (12 years ago) parent0789682
1 file changed+1−1
compare with master
unifiedsplit
src/Servant/Server/Internal.hs+1−1
src/Servant/Server/Internal.hs+1−1
@@ -276,7 +276,7 @@ instance ( AllCTRender ctypes a
276276 Right output -> do
277277 let accH = fromMaybe "*/*" $ lookup hAccept $ requestHeaders request
278278 case handleAcceptH (Proxy :: Proxy ctypes) (AcceptHeader accH) output of
279− Nothing -> responseLBS (mkStatus 406 "") [] ""
279+ Nothing -> responseLBS (mkStatus 406 "Not Acceptable") [] ""
280280 Just (contentT, body) -> responseLBS ok200 [ ("Content-Type"
281281 , cs contentT)] body
282282 Left (status, message) ->