diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2015-05-28 13:01:43 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2015-05-28 13:01:43 -0700 |
| commit | 4112fb83588dca1da1851826d02bda41855caec9 (patch) | |
| tree | b3009a82c98a7be0084be74d0a6bb03720c71665 /src/Text | |
| parent | f5087d84a19380bb08cdcba365cc9fadff9adc41 (diff) | |
| download | pandoc-4112fb83588dca1da1851826d02bda41855caec9.tar.gz | |
Texinfo writer: Removed tabs from source.
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc/Writers/Texinfo.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Writers/Texinfo.hs b/src/Text/Pandoc/Writers/Texinfo.hs index a5250ed3b..2325d1425 100644 --- a/src/Text/Pandoc/Writers/Texinfo.hs +++ b/src/Text/Pandoc/Writers/Texinfo.hs @@ -120,7 +120,7 @@ inCmd cmd contents = char '@' <> text cmd <> braces contents -- | Convert Pandoc block element to Texinfo. blockToTexinfo :: Block -- ^ Block to convert - -> State WriterState Doc + -> State WriterState Doc blockToTexinfo Null = return empty @@ -195,9 +195,9 @@ blockToTexinfo HorizontalRule = -- XXX can't get the equivalent from LaTeX.hs to work return $ text "@iftex" $$ text "@bigskip@hrule@bigskip" $$ - text "@end iftex" $$ + text "@end iftex" $$ text "@ifnottex" $$ - text (take 72 $ repeat '-') $$ + text (take 72 $ repeat '-') $$ text "@end ifnottex" blockToTexinfo (Header 0 _ lst) = do |