diff options
| author | Vaibhav Sagar <vaibhavsagar@gmail.com> | 2020-04-28 22:53:06 +0800 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2020-04-28 07:53:06 -0700 |
| commit | 9c2b659eeb196145f62d8eae0072c279a7c2d751 (patch) | |
| tree | f3c97feb0f1d063e2a7c65904c9fbe1591104a05 /src/Text/Pandoc/Readers/JATS.hs | |
| parent | 8d09a92d979126a53ec72ec73294ad04f811e9a7 (diff) | |
| download | pandoc-9c2b659eeb196145f62d8eae0072c279a7c2d751.tar.gz | |
Support new Underline element in readers and writers (#6277)
Deprecate `underlineSpan` in Shared in favor of `Text.Pandoc.Builder.underline`.
Diffstat (limited to 'src/Text/Pandoc/Readers/JATS.hs')
| -rw-r--r-- | src/Text/Pandoc/Readers/JATS.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/JATS.hs b/src/Text/Pandoc/Readers/JATS.hs index f78630ec0..d7f87f695 100644 --- a/src/Text/Pandoc/Readers/JATS.hs +++ b/src/Text/Pandoc/Readers/JATS.hs @@ -26,7 +26,7 @@ import Text.HTML.TagSoup.Entity (lookupEntity) import Text.Pandoc.Builder import Text.Pandoc.Class.PandocMonad (PandocMonad) import Text.Pandoc.Options -import Text.Pandoc.Shared (underlineSpan, crFilter, safeRead) +import Text.Pandoc.Shared (crFilter, safeRead) import Text.TeXMath (readMathML, writeTeX) import Text.XML.Light import qualified Data.Set as S (fromList, member) @@ -456,7 +456,7 @@ parseInline (Elem e) = "strike" -> strikeout <$> innerInlines "sub" -> subscript <$> innerInlines "sup" -> superscript <$> innerInlines - "underline" -> underlineSpan <$> innerInlines + "underline" -> underline <$> innerInlines "break" -> return linebreak "sc" -> smallcaps <$> innerInlines |