aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Logging.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-02-11 22:58:22 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2017-02-11 22:58:22 +0100
commit48c78713c8faf445bed23ae3005abdba3273346b (patch)
tree564b52b2fbac289fd93f5b46e3d1eaa7fb424c9e /src/Text/Pandoc/Logging.hs
parentcf26bc5f681a4d98f8962fd74e047dc30bd91d40 (diff)
downloadpandoc-48c78713c8faf445bed23ae3005abdba3273346b.tar.gz
Rename logMessagesToJSON -> encodeLogMessages.
Diffstat (limited to 'src/Text/Pandoc/Logging.hs')
-rw-r--r--src/Text/Pandoc/Logging.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Logging.hs b/src/Text/Pandoc/Logging.hs
index 15b903c05..65ba9783a 100644
--- a/src/Text/Pandoc/Logging.hs
+++ b/src/Text/Pandoc/Logging.hs
@@ -32,7 +32,7 @@ and info messages.
module Text.Pandoc.Logging (
Verbosity(..)
, LogMessage(..)
- , logMessagesToJSON
+ , encodeLogMessages
, showLogMessage
, messageVerbosity
) where
@@ -156,8 +156,8 @@ showPos pos = sn ++ "line " ++
then ""
else sourceName pos ++ " "
-logMessagesToJSON :: [LogMessage] -> BL.ByteString
-logMessagesToJSON ms =
+encodeLogMessages :: [LogMessage] -> BL.ByteString
+encodeLogMessages ms =
encodePretty' defConfig{ confCompare =
keyOrder [ "type", "verbosity", "contents", "message", "path",
"source", "line", "column" ] } ms