summaryrefslogtreecommitdiff
path: root/pandoc.hs
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2014-07-13 23:38:22 +0100
committerMatthew Pickering <matthewtpickering@gmail.com>2014-07-27 00:12:56 +0100
commitab3589ff0bc2c66c711e7a92021edd79bf52046a (patch)
tree32cfa00cd1a2b82acf31e94543a930a2cd0be9c2 /pandoc.hs
parent7d04d383a61299015e8017e42c38e1887808465a (diff)
Txt2Tags Reader: Integrated into pandoc
Diffstat (limited to 'pandoc.hs')
-rw-r--r--pandoc.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/pandoc.hs b/pandoc.hs
index 30c575a69..b16bfab78 100644
--- a/pandoc.hs
+++ b/pandoc.hs
@@ -876,6 +876,7 @@ defaultReaderName fallback (x:xs) =
".native" -> "native"
".json" -> "json"
".docx" -> "docx"
+ ".t2t" -> "t2t"
_ -> defaultReaderName fallback xs
-- Returns True if extension of first source is .lhs
@@ -1181,7 +1182,7 @@ main = do
let readFiles [] = error "Cannot read archive from stdin"
readFiles (x:_) = B.readFile x
- let convertTabs = tabFilter (if preserveTabs then 0 else tabStop)
+ let convertTabs = tabFilter (if (preserveTabs || readerName' == "t2t") then 0 else tabStop)
let handleIncludes' = if readerName' == "latex" || readerName' == "latex+lhs"
then handleIncludes