summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Highlighting.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2011-12-27 22:23:57 -0800
committerJohn MacFarlane <fiddlosopher@gmail.com>2011-12-27 22:24:31 -0800
commit3122959064412a40d650840467f2838326687251 (patch)
tree9374d61af56f38bcdb922283f914494262865651 /src/Text/Pandoc/Highlighting.hs
parent70b4ec95e4d1a565d32c074637bc3e3d203ce729 (diff)
Highlighting: Add language as class name.
This restores behavior of 1.8.2.1. Adjusted tests.
Diffstat (limited to 'src/Text/Pandoc/Highlighting.hs')
-rw-r--r--src/Text/Pandoc/Highlighting.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Highlighting.hs b/src/Text/Pandoc/Highlighting.hs
index 535f84ed2..0570fb2d2 100644
--- a/src/Text/Pandoc/Highlighting.hs
+++ b/src/Text/Pandoc/Highlighting.hs
@@ -64,6 +64,6 @@ highlight formatter (_, classes, keyvals) rawCode =
in case find (`elem` lcLanguages) lcclasses of
Nothing -> Nothing
Just language -> Just
- $ formatter fmtOpts
+ $ formatter fmtOpts{ codeClasses = [language] }
$ highlightAs language rawCode