HTML writer: Include highlighting-css for code spans, too.
Previously it was only included if used in a code block. Closes #653.
This commit is contained in:
parent
09603b94f7
commit
54fb384369
1 changed files with 3 additions and 1 deletions
|
@ -591,7 +591,9 @@ inlineToHtml opts inline =
|
|||
Nothing -> return
|
||||
$ foldl (!) H.code (attrsToHtml opts attr)
|
||||
$ strToHtml str
|
||||
Just h -> return $ foldl (!) h $
|
||||
Just h -> do
|
||||
modify $ \st -> st{ stHighlighting = True }
|
||||
return $ foldl (!) h $
|
||||
attrsToHtml opts (id',[],keyvals)
|
||||
where (id',_,keyvals) = attr
|
||||
(Strikeout lst) -> inlineListToHtml opts lst >>=
|
||||
|
|
Loading…
Add table
Reference in a new issue