git.iko.soy/typeable/pandoc
on master help sign in
Correct superscript/subscript.
commit4850aaf046dacc942716b6827d2e82e9b310c284 authorAndrew Dunning <adunning@users.noreply.github.com> dateWed 8 Jul 2015, 13:57 (11 years ago) parent9e528f4
1 file changed+3−3
src/Text/Pandoc/Writers/CommonMark.hs+3−3
src/Text/Pandoc/Writers/CommonMark.hs+3−3
@@ -144,11 +144,11 @@ inlineToNodes (Strikeout xs) =
144144 ((node (INLINE_HTML (T.pack "<s>")) [] : inlinesToNodes xs ++
145145 [node (INLINE_HTML (T.pack "</s>")) []]) ++ )
146146inlineToNodes (Superscript xs) =
147− ((node (INLINE_HTML (T.pack "<sub>")) [] : inlinesToNodes xs ++
148− [node (INLINE_HTML (T.pack "</sub>")) []]) ++ )
149−inlineToNodes (Subscript xs) =
150147 ((node (INLINE_HTML (T.pack "<sup>")) [] : inlinesToNodes xs ++
151148 [node (INLINE_HTML (T.pack "</sup>")) []]) ++ )
149+inlineToNodes (Subscript xs) =
150+ ((node (INLINE_HTML (T.pack "<sub>")) [] : inlinesToNodes xs ++
151+ [node (INLINE_HTML (T.pack "</sub>")) []]) ++ )
152152inlineToNodes (SmallCaps xs) =
153153 ((node (INLINE_HTML (T.pack "<span style=\"font-variant:small-caps;\">")) []
154154 : inlinesToNodes xs ++