diff options
author | 2025-02-19 14:20:33 +0100 | |
---|---|---|
committer | 2025-02-19 14:21:09 +0100 | |
commit | 7916df381a7832f01f6dafb83ab62d5095af808d (patch) | |
tree | aa835c0c51355a905f7d0c046ddaf65393d32700 /app/Main.hs | |
parent | 47ca7c9e8658c1bdbd9e9519581935b1da3ee538 (diff) |
generalize `Store.query`
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" |