diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2012-09-27 15:01:00 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2012-09-27 15:01:00 -0700 |
| commit | 606b5e8ed4d2e9bbf2bc3eb36c7328c07adaa820 (patch) | |
| tree | 555e9679673e0858a1624f82d05ada8a0ef1b308 /src/Text/Pandoc/Readers | |
| parent | bae39e77a82a911b5a861970a6680fbd0cfd5357 (diff) | |
| download | pandoc-606b5e8ed4d2e9bbf2bc3eb36c7328c07adaa820.tar.gz | |
Removed Ext_monospace_autolinks.
Diffstat (limited to 'src/Text/Pandoc/Readers')
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 6f4e5672e..9512328ea 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -1476,18 +1476,14 @@ bareURL :: Parser [Char] ParserState (F Inlines) bareURL = try $ do guardEnabled Ext_autolink_urls (orig, src) <- uri <|> emailAddress - (guardEnabled Ext_monospace_autolinks >> - return (return $ B.link src "" (B.codeWith ("",["url"],[]) orig))) - <|> return (return $ B.link src "" (B.str orig)) + return $ return $ B.link src "" (B.codeWith ("",["url"],[]) orig) autoLink :: Parser [Char] ParserState (F Inlines) autoLink = try $ do char '<' (orig, src) <- uri <|> emailAddress char '>' - (guardEnabled Ext_monospace_autolinks >> - return (return $ B.link src "" (B.codeWith ("",["url"],[]) orig))) - <|> return (return $ B.link src "" (B.str orig)) + return $ return $ B.link src "" (B.codeWith ("",["url"],[]) orig) image :: Parser [Char] ParserState (F Inlines) image = try $ do |