summaryrefslogtreecommitdiff
path: root/Utility/JSONStream.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-12-13 00:45:27 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-12-13 00:45:27 -0400
commit7db480af0f944ca0e6c062cd1243c63ad7f878d1 (patch)
tree21d7efe0b866dd7db1a5396a842652f49c676e84 /Utility/JSONStream.hs
parent94554782894ec6c26da3b46312d5d1d16d596458 (diff)
whitespace fixes
Diffstat (limited to 'Utility/JSONStream.hs')
-rw-r--r--Utility/JSONStream.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Utility/JSONStream.hs b/Utility/JSONStream.hs
index aaa332bca..f3e93c3da 100644
--- a/Utility/JSONStream.hs
+++ b/Utility/JSONStream.hs
@@ -14,9 +14,9 @@ module Utility.JSONStream (
import Text.JSON
{- Text.JSON does not support building up a larger JSON document piece by
- piece as a stream. To support streaming, a hack. The JSObject is converted
- to a string with its final "}" is left off, allowing it to be added to
- later. -}
+ - piece as a stream. To support streaming, a hack. The JSObject is converted
+ - to a string with its final "}" is left off, allowing it to be added to
+ - later. -}
start :: JSON a => [(String, a)] -> String
start l
| last s == endchar = init s