diff options
| author | John MacFarlane <fiddlosopher@gmail.com> | 2011-12-22 13:21:44 -0800 |
|---|---|---|
| committer | John MacFarlane <fiddlosopher@gmail.com> | 2011-12-22 13:24:43 -0800 |
| commit | fca95bf43c16f19466df26c7875a5c8be144b77e (patch) | |
| tree | 950a13926dc260b2e53ea80ea73d04a408bed41f /src/Text/Pandoc/Highlighting.hs | |
| parent | f61e09cb9a67e13deee5c48ac815e03f79989817 (diff) | |
Removed highlighting flag. Highlighting support is now standard.
Diffstat (limited to 'src/Text/Pandoc/Highlighting.hs')
| -rw-r--r-- | src/Text/Pandoc/Highlighting.hs | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/src/Text/Pandoc/Highlighting.hs b/src/Text/Pandoc/Highlighting.hs index 282c13930..60e900333 100644 --- a/src/Text/Pandoc/Highlighting.hs +++ b/src/Text/Pandoc/Highlighting.hs @@ -36,7 +36,6 @@ module Text.Pandoc.Highlighting ( languages ) where import Text.Blaze import Text.Pandoc.Definition -#ifdef _HIGHLIGHTING import Text.Highlighting.Kate ( SourceLine, languages, highlightAs, formatAsHtml, TokenType(..), formatAsLaTeX, FormatOption (..), defaultHighlightingCss, languagesByExtension ) import Data.List (find) @@ -82,19 +81,3 @@ highlightLaTeX :: Bool -- ^ True if inline -> Maybe String -- ^ Maybe formatted LaTeX highlightLaTeX = highlight formatAsLaTeX -#else -defaultHighlightingCss :: String -defaultHighlightingCss = "" - -languages :: [String] -languages = [] - -languagesByExtension :: String -> [String] -languagesByExtension _ = [] - -highlightHtml :: Bool -> Attr -> String -> Maybe Html -highlightHtml _ _ _ = Left "Pandoc was not compiled with support for highlighting" - -highlightLaTeX :: Bool -> Attr -> String -> Maybe String -highlightLaTeX _ _ _ = Left "Pandoc was not compiled with support for highlighting" -#endif |