@@ -160,7 +160,7 @@ collapseStream :: [BulkOperation] -> L.ByteString
160160collapseStream stream = collapsed where
161161 blobs = intersperse "\n" $ concat $ fmap getStreamChunk stream
162162 mashedTaters = mash (mempty :: Builder) blobs
163− collapsed = toLazyByteString $ mappend mashedTaters "\n"
163+ collapsed = toLazyByteString $ mappend mashedTaters (byteString "\n")
164164
165165mash :: Builder -> [L.ByteString] -> Builder
166166mash builder xs = foldl' (\b x -> mappend b (lazyByteString x)) builder xs