diff options
author | mpickering <matthewtpickering@gmail.com> | 2014-05-07 13:03:45 +0100 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2014-05-07 09:48:48 -0700 |
commit | f0f88111e6597ade7e771457fc1b81bcc9a6d974 (patch) | |
tree | 86063f1fec27bb66a691fd2698cd6c24f815f561 | |
parent | 0050b509052ff81ba021b98fdbc573d3475ed74c (diff) | |
download | pandoc-f0f88111e6597ade7e771457fc1b81bcc9a6d974.tar.gz |
Small improvement to textile reader fix. Removed 'try'.
-rw-r--r-- | src/Text/Pandoc/Readers/Textile.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Textile.hs b/src/Text/Pandoc/Readers/Textile.hs index f7c87ab5a..9ee34caa5 100644 --- a/src/Text/Pandoc/Readers/Textile.hs +++ b/src/Text/Pandoc/Readers/Textile.hs @@ -513,7 +513,7 @@ link = try $ do char '"' *> notFollowedBy (oneOf " \t\n\r") attr <- attributes name <- trimInlines . mconcat <$> - withQuoteContext InDoubleQuote (many1Till inline (try (char '"'))) + withQuoteContext InDoubleQuote (many1Till inline (char '"')) char ':' let stop = if bracketed then char ']' |