diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Readers/MediaWiki.hs | 2 | ||||
| -rw-r--r-- | src/Text/Pandoc/Writers/ChunkedHTML.hs | 1 |
2 files changed, 1 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/MediaWiki.hs b/src/Text/Pandoc/Readers/MediaWiki.hs index 423758c60..eafaa8aa4 100644 --- a/src/Text/Pandoc/Readers/MediaWiki.hs +++ b/src/Text/Pandoc/Readers/MediaWiki.hs @@ -664,7 +664,7 @@ internalLink = try $ do -- [[Help:Contents|] -> "Contents" <|> return (B.text $ T.drop 1 $ T.dropWhile (/=':') pagename) ) sym "]]" - linktrail <- B.text <$> manyChar (satisfy (\c -> isAscii c && isLetter c)) + linktrail <- B.text <$> manyChar (satisfy (\c -> isAscii c && isLetter c)) let link = B.link (addUnderscores pagename) "wikilink" (label <> linktrail) if "Category:" `T.isPrefixOf` pagename then do diff --git a/src/Text/Pandoc/Writers/ChunkedHTML.hs b/src/Text/Pandoc/Writers/ChunkedHTML.hs index 61dcdbd80..9757cbe6e 100644 --- a/src/Text/Pandoc/Writers/ChunkedHTML.hs +++ b/src/Text/Pandoc/Writers/ChunkedHTML.hs @@ -163,4 +163,3 @@ addContextVars opts topChunk chunk context = formatHeading ch = SimpleVal . literal . either (const "") id . runPure $ writeHtml5String opts{ writerTemplate = Nothing } (Pandoc nullMeta [Plain $ chunkHeading ch]) - |