From 43382cead2f578be6e1f4a2813165e51e017e2e3 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Tue, 7 Jun 2016 23:37:21 -0700 Subject: trypandoc: call results 'html' instead of 'result'. This is for better compatibility with babelmark2. --- trypandoc/index.html | 2 +- trypandoc/trypandoc.hs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'trypandoc') diff --git a/trypandoc/index.html b/trypandoc/index.html index c46f4d132..d9674793b 100644 --- a/trypandoc/index.html +++ b/trypandoc/index.html @@ -39,7 +39,7 @@ $(document).ready(function() { if (text && text != "") { $.getJSON("/cgi-bin/trypandoc", { from: from, to: to, text: text }, function(res) { - $("#results").text(res.result); + $("#results").text(res.html); $("#version").text(res.version); $("#command").text("pandoc --from " + from + " --to " + to); }); diff --git a/trypandoc/trypandoc.hs b/trypandoc/trypandoc.hs index 8f1b3278e..e11c90a40 100644 --- a/trypandoc/trypandoc.hs +++ b/trypandoc/trypandoc.hs @@ -33,7 +33,7 @@ app req respond = do let result = case reader $ tabFilter 4 $ T.unpack text of Right doc -> T.pack $ writer doc Left err -> error (show err) - let output = encode $ object [ T.pack "result" .= result + let output = encode $ object [ T.pack "html" .= result , T.pack "name" .= if fromFormat == "markdown_strict" then T.pack "pandoc (strict)" -- cgit v1.2.3