diff options
author | Simon Hengel <sol@typeful.net> | 2012-01-12 11:54:37 +0100 |
---|---|---|
committer | David Waern <david.waern@gmail.com> | 2012-02-04 00:50:04 +0100 |
commit | d327e3dfea1dda473c065b0e6a7da2161c9e6668 (patch) | |
tree | 644c8ba2ba8829547971419004571c430b6da5a2 /src/Haddock/Backends/Xhtml | |
parent | 7829173d5c619f93edb5075d66e2ed15c4cc73c6 (diff) |
Add DocWarning to Doc
The Xhtml backend has special markup for that, Hoogle and LaTeX reuse
what we have for DocEmphasis.
Diffstat (limited to 'src/Haddock/Backends/Xhtml')
-rw-r--r-- | src/Haddock/Backends/Xhtml/DocMarkup.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Haddock/Backends/Xhtml/DocMarkup.hs b/src/Haddock/Backends/Xhtml/DocMarkup.hs index f506d2b8..ee0a549f 100644 --- a/src/Haddock/Backends/Xhtml/DocMarkup.hs +++ b/src/Haddock/Backends/Xhtml/DocMarkup.hs @@ -39,6 +39,7 @@ parHtmlMarkup qual ppId = Markup { markupIdentifierUnchecked = thecode . ppUncheckedLink qual, markupModule = \m -> let (mdl,ref) = break (=='#') m in ppModuleRef (mkModuleName mdl) ref, + markupWarning = thediv ! [theclass "warning"], markupEmphasis = emphasize, markupMonospaced = thecode, markupUnorderedList = unordList, |