summaryrefslogtreecommitdiff
path: root/Messages
diff options
context:
space:
mode:
Diffstat (limited to 'Messages')
-rw-r--r--Messages/JSON.hs5
1 files changed, 1 insertions, 4 deletions
diff --git a/Messages/JSON.hs b/Messages/JSON.hs
index e262192a8..d57d69318 100644
--- a/Messages/JSON.hs
+++ b/Messages/JSON.hs
@@ -34,7 +34,4 @@ add :: JSON a => [(String, a)] -> IO ()
add v = putStr $ Stream.add v
complete :: JSON a => [(String, a)] -> IO ()
-complete v = putStr $ concat
- [ Stream.start v
- , Stream.end
- ]
+complete v = putStr $ Stream.start v ++ Stream.end