diff options
Diffstat (limited to 'app/Main.hs')
| -rw-r--r-- | app/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/app/Main.hs b/app/Main.hs index 3b7f59d..9da083a 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -91,6 +91,6 @@ main = do <$> W.lazyRequestBody req r <- liftIO $ Q.withStore root ref (Q.query q) respond . W.responseLBS W.status200 [] $ - J.encode r + J.encode @J.Value r | otherwise -> respond $ W.responseLBS W.status200 [] "OK" |