jimmy/postgrest
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix frozen tests

Browse Source 
Problem found by @ruslantalpa
This commit is contained in:
Joe Nelson
2016-02-22 08:41:31 -08:00
parent 072a6ce4c7
commit 7b7babd1d1
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/PostgREST/Error.hs
+1 -1
View File
@@ -30,7 +30,7 @@ instance JSON.ToJSON P.UsageError where
"code" .= ("" :: T.Text), "code" .= ("" :: T.Text),
"message" .= ("Connection error" :: T.Text), "message" .= ("Connection error" :: T.Text),
"details" .= (cs (fromMaybe "" e) :: T.Text)] "details" .= (cs (fromMaybe "" e) :: T.Text)]
toJSON e = JSON.toJSON e -- H.Error toJSON (P.SessionError e) = JSON.toJSON e -- H.Error
instance JSON.ToJSON H.Error where instance JSON.ToJSON H.Error where
toJSON (H.ResultError (H.ServerError c m d h)) = JSON.object [ toJSON (H.ResultError (H.ServerError c m d h)) = JSON.object [