Fixes linter suggestions

2015-10-18 20:10:26 -04:00
parent 4e9afc8096
commit a3aba84ba8
1 changed files with 2 additions and 2 deletions
@@ -178,8 +178,8 @@ app dbstructure conf reqBody req =
          return $ responseLBS status200 [jsonH]
                 (let body = fromMaybe emptyArray $ runIdentity <$> bodyJson in
                    if hasPrefer "return=jwt"
-                    then ("{\"token\":\"" <> (cs $ tokenJWT jwtSecret $ body) <> "\"}")
-                    else (cs $ encode $ body))
+                    then "{\"token\":\"" <> cs (tokenJWT jwtSecret body) <> "\"}"
+                    else cs $ encode body)
        else return $ responseLBS status404 [] ""

      -- check that proc exists