summaryrefslogtreecommitdiff
path: root/Command/Status.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-07-26 19:15:34 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-07-26 19:15:34 -0400
commitbcc5ee4f322a139ee7cef2bae1fc9bea9f5398ca (patch)
treed4bfd67f6efcb0000c8749aaa6cdae964b333edc /Command/Status.hs
parente0b3fc906467ded314c75417d5b11b4b04375d1a (diff)
Removed dependency on json library; all JSON is now handled by aeson.
I've eyeballed all --json commands, and the only difference should be that some fields are re-ordered.
Diffstat (limited to 'Command/Status.hs')
-rw-r--r--Command/Status.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Status.hs b/Command/Status.hs
index f4270228d..3a3bfa812 100644
--- a/Command/Status.hs
+++ b/Command/Status.hs
@@ -43,7 +43,7 @@ displayStatus s = do
let c = statusChar s
absf <- fromRepo $ fromTopFilePath (statusFile s)
f <- liftIO $ relPathCwdToFile absf
- unlessM (showFullJSON $ JSONObject [("status", [c]), ("file", f)]) $
+ unlessM (showFullJSON $ JSONChunk [("status", [c]), ("file", f)]) $
liftIO $ putStrLn $ [c] ++ " " ++ f
-- Git thinks that present direct mode files are typechanged.