From f2fb733e0d7c287397e933571661988a71985765 Mon Sep 17 00:00:00 2001
From: John MacFarlane <fiddlosopher@gmail.com>
Date: Thu, 18 Aug 2011 10:48:48 -0700
Subject: [PATCH] Templates: Return empty string for json template.
Thanks to Dirk Laurie for pointing out the bug.
---
src/Text/Pandoc/Templates.hs | 1 +
1 file changed, 1 insertion(+)
diff --git a/src/Text/Pandoc/Templates.hs b/src/Text/Pandoc/Templates.hs
index 19c9a808a..4a850fc6f 100644
--- a/src/Text/Pandoc/Templates.hs
+++ b/src/Text/Pandoc/Templates.hs
@@ -82,6 +82,7 @@ getDefaultTemplate :: (Maybe FilePath) -- ^ User data directory to search first
-> String -- ^ Name of writer
-> IO (Either E.IOException String)
getDefaultTemplate _ "native" = return $ Right ""
+getDefaultTemplate _ "json" = return $ Right ""
getDefaultTemplate user "odt" = getDefaultTemplate user "opendocument"
getDefaultTemplate user "epub" = getDefaultTemplate user "html"
getDefaultTemplate user writer = do