diff options
| -rw-r--r-- | Text/Pandoc/Readers/HTML.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Text/Pandoc/Readers/HTML.hs b/Text/Pandoc/Readers/HTML.hs index 4ce823812..c3d597f00 100644 --- a/Text/Pandoc/Readers/HTML.hs +++ b/Text/Pandoc/Readers/HTML.hs @@ -442,7 +442,7 @@ rawHtmlInline = do betweenTags tag = try $ htmlTag tag >> inlinesTilEnd tag >>= return . normalizeSpaces -emph = (betweenTags "em" <|> betweenTags "it") >>= return . Emph +emph = (betweenTags "em" <|> betweenTags "i") >>= return . Emph strong = (betweenTags "b" <|> betweenTags "strong") >>= return . Strong |