json-response: Fix variable name in server.hs.