json-response: Remove redundant parentheses in server.hs.
json-response: Clean up server.hs.