From 250aa202505b077de548ecd19ba5f8b2867fe4ce Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sun, 12 Dec 2010 20:30:26 -0800
Subject: [PATCH] Recognize .json extension as json reader/writer.

---
 src/pandoc.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/pandoc.hs b/src/pandoc.hs
index daad7d43c..13f285f15 100644
--- a/src/pandoc.hs
+++ b/src/pandoc.hs
@@ -524,6 +524,7 @@ defaultReaderName fallback (x:xs) =
     ".lhs"      -> "markdown+lhs"
     ".textile"  -> "textile"
     ".native"   -> "native"
+    ".json"     -> "json"
     _           -> defaultReaderName fallback xs
 
 -- Returns True if extension of first source is .lhs
@@ -546,6 +547,7 @@ defaultWriterName x =
     ".rst"      -> "rst"
     ".s5"       -> "s5"
     ".native"   -> "native"
+    ".json"     -> "json"
     ".txt"      -> "markdown"
     ".text"     -> "markdown"
     ".md"       -> "markdown"