From 0a29da50426859ad19f4d388edab9dc90ebfa1ca Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Sat, 27 Oct 2018 11:22:21 -0700 Subject: [PATCH] Remove old comment. --- src/Text/Pandoc/Readers/Roff.hs | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/src/Text/Pandoc/Readers/Roff.hs b/src/Text/Pandoc/Readers/Roff.hs index 89c0dd166..7d9aae8b6 100644 --- a/src/Text/Pandoc/Readers/Roff.hs +++ b/src/Text/Pandoc/Readers/Roff.hs @@ -104,12 +104,11 @@ data CellFormat = type TableRow = ([CellFormat], [RoffTokens]) --- TODO parse tables (see man tbl) data RoffToken = MLine [LinePart] - | MEmptyLine - | MMacro MacroKind [Arg] SourcePos - | MTable [TableOption] [TableRow] SourcePos - deriving Show + | MEmptyLine + | MMacro MacroKind [Arg] SourcePos + | MTable [TableOption] [TableRow] SourcePos + deriving Show newtype RoffTokens = RoffTokens { unRoffTokens :: Seq.Seq RoffToken } deriving (Show, Semigroup, Monoid)