diff options
| author | Kazu Yamamoto <kazu@iij.ad.jp> | 2012-04-09 15:45:57 +0900 |
|---|---|---|
| committer | Simon Hengel <sol@typeful.net> | 2012-10-09 12:45:31 +0200 |
| commit | 72675c1bf281b81041a19014b1b7df03a0de9488 (patch) | |
| tree | 70b5fd4875eb604d1b092912d84a1fc696126b2a /src/Haddock/Utils.hs | |
| parent | ac8417bd0e947d81713a8ec31fe048aa43e34c03 (diff) | |
Add markup support for properties
Diffstat (limited to 'src/Haddock/Utils.hs')
| -rw-r--r-- | src/Haddock/Utils.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Haddock/Utils.hs b/src/Haddock/Utils.hs index b8f32589..4424ad73 100644 --- a/src/Haddock/Utils.hs +++ b/src/Haddock/Utils.hs @@ -432,6 +432,7 @@ markup m (DocCodeBlock d) = markupCodeBlock m (markup m d) markup m (DocHyperlink l) = markupHyperlink m l markup m (DocAName ref) = markupAName m ref markup m (DocPic img) = markupPic m img +markup m (DocProperty p) = markupProperty m p markup m (DocExamples e) = markupExample m e @@ -459,6 +460,7 @@ idMarkup = Markup { markupHyperlink = DocHyperlink, markupAName = DocAName, markupPic = DocPic, + markupProperty = DocProperty, markupExample = DocExamples } |