diff options
| author | Jesse Rosenthal <jrosenthal@jhu.edu> | 2018-01-20 09:48:47 -0500 |
|---|---|---|
| committer | Jesse Rosenthal <jrosenthal@jhu.edu> | 2018-01-20 09:49:45 -0500 |
| commit | fa912bb15e3ceac863fb8d46ee6f137da34eb634 (patch) | |
| tree | 544e71a2d7d0cb15163ee8de07830fa6d997acb0 /src/Text/Pandoc | |
| parent | 736c2c554f3c93a1c862fea7fd2c90680de3500d (diff) | |
| download | pandoc-fa912bb15e3ceac863fb8d46ee6f137da34eb634.tar.gz | |
Docx reader: Use already imported operator
This fixes an import error in the last commit.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Readers/Docx/Fields.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Docx/Fields.hs b/src/Text/Pandoc/Readers/Docx/Fields.hs index aef10ffcf..6eeb55d2f 100644 --- a/src/Text/Pandoc/Readers/Docx/Fields.hs +++ b/src/Text/Pandoc/Readers/Docx/Fields.hs @@ -63,7 +63,7 @@ quotedString = do concat <$> manyTill inQuotes (try (char '"')) unquotedString :: Parser String -unquotedString = manyTill anyChar (try $ lookAhead space $> () <|> eof) +unquotedString = manyTill anyChar (try $ lookAhead space *> return () <|> eof) fieldArgument :: Parser String fieldArgument = quotedString <|> unquotedString |