diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2021-08-11 17:53:39 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2021-08-11 17:53:39 -0700 |
| commit | 073895c340b85dc66b45e0c716d8357f8c7c5a13 (patch) | |
| tree | 34c738a9983ec2bd4ad0f24fa8380ca43bacd942 /src/Text/Pandoc/Readers/LaTeX/Parsing.hs | |
| parent | dd1a956a8aa7d0cadd37db1650698eee9274beee (diff) | |
| download | pandoc-073895c340b85dc66b45e0c716d8357f8c7c5a13.tar.gz | |
Fix some lint issues.
Diffstat (limited to 'src/Text/Pandoc/Readers/LaTeX/Parsing.hs')
| -rw-r--r-- | src/Text/Pandoc/Readers/LaTeX/Parsing.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX/Parsing.hs b/src/Text/Pandoc/Readers/LaTeX/Parsing.hs index e1b72926f..075e1f656 100644 --- a/src/Text/Pandoc/Readers/LaTeX/Parsing.hs +++ b/src/Text/Pandoc/Readers/LaTeX/Parsing.hs @@ -224,8 +224,8 @@ instance HasIncludeFiles LaTeXState where instance HasMacros LaTeXState where extractMacros st = NonEmpty.head $ sMacros st - updateMacros f st = st{ sMacros = f (NonEmpty.head $ sMacros st) - :| (NonEmpty.tail $ sMacros st) } + updateMacros f st = st{ sMacros = f (NonEmpty.head (sMacros st)) + :| NonEmpty.tail (sMacros st) } instance HasReaderOptions LaTeXState where extractReaderOptions = sOptions |