diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-10-28 23:30:29 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-10-28 23:30:29 +0000 |
commit | 63dfc3abf274bc4fb85b43c1e1a74e9baf18bc77 (patch) | |
tree | 815fb115c03ac17fb2e422dbedb312fce81a51dd /src/Text/Pandoc | |
parent | 27ea29a906616fabf62754181af9fd1f2dd7c1f4 (diff) | |
download | pandoc-63dfc3abf274bc4fb85b43c1e1a74e9baf18bc77.tar.gz |
Modified specialChar in LaTeX reader so that '"'
characters are parsed and do not cause an error.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1056 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index 77c642e7e..37cc2bfe4 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -494,7 +494,7 @@ escapedChar = do -- ignore standalone, nonescaped special characters unescapedChar = oneOf "`$^&_#{}|<>" >> return (Str "") -specialChar = choice [ backslash, tilde, caret, bar, lt, gt ] +specialChar = choice [ backslash, tilde, caret, bar, lt, gt, doubleQuote ] backslash = try (string "\\textbackslash") >> return (Str "\\") @@ -508,6 +508,8 @@ lt = try (string "\\textless") >> return (Str "<") gt = try (string "\\textgreater") >> return (Str ">") +doubleQuote = char '"' >> return (Str "\"") + code = code1 <|> code2 code1 = try $ do |