From aa1c8ac49631f2dafc25aa1d9938a37a8beb4bfa Mon Sep 17 00:00:00 2001
From: fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
Date: Tue, 10 Jul 2007 06:18:23 +0000
Subject: Recognize output filenames with any single-digit extension as man
 format.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@668 788f1e2b-df1e-0410-8736-df70ead52e1b
---
 src/Main.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Main.hs b/src/Main.hs
index a5c64d7d0..dcfad2723 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -364,7 +364,7 @@ defaultWriterName x =
     Just ["db"]       -> "docbook"
     Just ["xml"]      -> "docbook"
     Just ["sgml"]     -> "docbook"
-    Just ["1"]        -> "man"
+    Just [[x]] | x `elem` ['1'..'9'] -> "man"
     Just _            -> "html"
 
 main = do
-- 
cgit v1.2.3