54fb384 · typeable/pandoc

git.iko.soy/typeable/pandoc

HTML writer: Include highlighting-css for code spans, too.

Previously it was only included if used in a code block. Closes #653.

commit54fb3843693d7fb004053aad91ecc69a96dcef82 authorJohn MacFarlane <fiddlosopher@gmail.com> dateMon 5 Nov 2012, 10:45 (14 years ago) parent09603b9

1 file changed+3−1

unifiedsplit

src/Text/Pandoc/Writers/HTML.hs+3−1

@@ -591,7 +591,9 @@ inlineToHtml opts inline =

591591 Nothing -> return

592592 $ foldl (!) H.code (attrsToHtml opts attr)

593593 $ strToHtml str

594− Just h -> return $ foldl (!) h $

594+ Just h -> do

595+ modify $ \st -> st{ stHighlighting = True }

596+ return $ foldl (!) h $

595597 attrsToHtml opts (id',[],keyvals)

596598 where (id',_,keyvals) = attr

597599 (Strikeout lst) -> inlineListToHtml opts lst >>=