Encode JSON objects and arrays in the right order
commit10164be57926982480c987867bb45fa1c1ecdfb7
authorEvan Czaplicki <evancz@users.noreply.github.com>
dateSun 23 Apr 2017, 17:08 (10 years ago)
parent774aebd
src/Json/Encode.hs+2−2
@@ -203,10 +203,10 @@ encodeSequence open close encodeEntry indent first rest =
203203 newline <> B.byteString indent <> close
204204
205205 addValue field builder =
206− builder
207− <> commaNewline
206+ commaNewline
208207 <> newIndentBuilder
209208 <> encodeEntry newIndent field
209+ <> builder
210210 in
211211 open
212212 <> newIndentBuilder