1
1
mirror of https://github.com/github/semantic.git synced 2024-12-24 07:25:44 +03:00

Simplify encoding of diff summaries as JSON

This commit is contained in:
Rick Winfrey 2016-06-28 15:24:24 -05:00
parent efc1ca7973
commit 6f5a573ad4

View File

@ -4,8 +4,7 @@ import Prologue
import Renderer
import DiffSummary
import Data.Aeson
import Data.ByteString.Builder
import Data.Text (pack)
summary :: Renderer
summary diff _ = toS . toLazyByteString . fromEncoding . foldable $ pack . show <$> diffSummary diff
summary diff _ = toS . encode $ pack . show <$> diffSummary diff