diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2018-08-18 09:09:43 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2018-08-18 09:09:43 -0700 |
| commit | bebfda62dcc90db9e7866c4b8e3709873dcf80ac (patch) | |
| tree | 8c77b32509dcd4b6abb77405e45cbe71d415e463 | |
| parent | 42f4632e600dea34e5dcbe75fc734899a2436c05 (diff) | |
| download | pandoc-bebfda62dcc90db9e7866c4b8e3709873dcf80ac.tar.gz | |
Fix compiler warning.
| -rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index b385e4462..2f16738ac 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -746,7 +746,7 @@ dosiunitx = do siUnit :: PandocMonad m => LP m Inlines siUnit = do - Tok _ (CtrlSeq name) cmd <- anyControlSeq + Tok _ (CtrlSeq name) _ <- anyControlSeq if name == "square" then do unit <- grouped (mconcat <$> many1 siUnit) <|> siUnit <|> tok |