Fix wrong status 404 when PATCH request didn't change anything (#1272)

2019-04-19 13:50:19 -05:00
parent 87f7e86aa7
commit 553531711b
5 changed files with 117 additions and 80 deletions
@@ -64,7 +64,7 @@ pgError authed e =
                else [jsonType] in
  responseLBS status hdrs (encodeError e)

-singularityError :: Integer -> Response
+singularityError :: (Integral a, Show a) => a -> Response
 singularityError numRows =
  responseLBS HT.status406
    [toHeader CTSingularJSON]