diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2018-10-30 15:59:34 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2018-10-30 15:59:34 -0700 |
| commit | e9130b8e52d01ebbc157f26ecdc4f3d81b0f2e9b (patch) | |
| tree | 4eb1ac1f8e4cfcbce1ccd4c84923ae8a98a4d4e2 /src/Text/Pandoc/Readers/Roff.hs | |
| parent | 3305a018bc38a435a7bd006f9447d97ee3ea6868 (diff) | |
| download | pandoc-e9130b8e52d01ebbc157f26ecdc4f3d81b0f2e9b.tar.gz | |
Roff reader: removed MacroKind alias.
Diffstat (limited to 'src/Text/Pandoc/Readers/Roff.hs')
| -rw-r--r-- | src/Text/Pandoc/Readers/Roff.hs | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/src/Text/Pandoc/Readers/Roff.hs b/src/Text/Pandoc/Readers/Roff.hs index 9e3315cb3..b1011c2d3 100644 --- a/src/Text/Pandoc/Readers/Roff.hs +++ b/src/Text/Pandoc/Readers/Roff.hs @@ -32,8 +32,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA Tokenizer for groff formats (man, ms). -} module Text.Pandoc.Readers.Roff - ( MacroKind - , FontSpec(..) + ( FontSpec(..) , defaultFontSpec , LinePart(..) , Arg @@ -83,8 +82,6 @@ data FontSpec = FontSpec{ fontBold :: Bool defaultFontSpec :: FontSpec defaultFontSpec = FontSpec False False False -type MacroKind = String - data LinePart = RoffStr String | Font FontSpec | MacroArg Int @@ -106,7 +103,7 @@ type TableRow = ([CellFormat], [RoffTokens]) data RoffToken = MLine [LinePart] | MEmptyLine - | MMacro MacroKind [Arg] SourcePos + | MMacro String [Arg] SourcePos | MTable [TableOption] [TableRow] SourcePos deriving Show |