diff options
author | John MacFarlane <jgm@berkeley.edu> | 2017-03-04 14:43:52 +0100 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-03-04 14:43:52 +0100 |
commit | b64211a547abf8e454b01e0b79cd18d689f1f3bc (patch) | |
tree | 433b33533935ca64a3062377aab4cad1e27d3241 /src/Text/Pandoc | |
parent | 8f20d7d92091c87e516fe785a323e845578d63f8 (diff) |
Use smallcaps class for SmallCaps in CommonMark writer.
See #1592.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r-- | src/Text/Pandoc/Writers/CommonMark.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/CommonMark.hs b/src/Text/Pandoc/Writers/CommonMark.hs index 2c844d3a0..5e0a06bf0 100644 --- a/src/Text/Pandoc/Writers/CommonMark.hs +++ b/src/Text/Pandoc/Writers/CommonMark.hs @@ -162,7 +162,7 @@ inlineToNodes (Subscript xs) = ((node (HTML_INLINE (T.pack "<sub>")) [] : inlinesToNodes xs ++ [node (HTML_INLINE (T.pack "</sub>")) []]) ++ ) inlineToNodes (SmallCaps xs) = - ((node (HTML_INLINE (T.pack "<span style=\"font-variant:small-caps;\">")) [] + ((node (HTML_INLINE (T.pack "<span class=\"smallcaps\">")) [] : inlinesToNodes xs ++ [node (HTML_INLINE (T.pack "</span>")) []]) ++ ) inlineToNodes (Link _ ils (url,tit)) = |