diff options
| author | David Waern <david.waern@gmail.com> | 2012-07-23 16:50:40 +0200 |
|---|---|---|
| committer | David Waern <david.waern@gmail.com> | 2012-07-23 16:50:40 +0200 |
| commit | c3811c56988ecae6c3d3b2c4c202474de012e9ed (patch) | |
| tree | c7d897e98c3523d056d38745b794c681b30a38f6 /src/Haddock/Utils.hs | |
| parent | 83a2a6ab67b25eec42c50b99b0b594313b8abe44 (diff) | |
| parent | 0730c1b4088fd5d2c36671b0adf3c9e11222e233 (diff) | |
Merge branch 'dev' of https://github.com/sol/haddock into ghc-7.6
Conflicts:
src/Haddock/InterfaceFile.hs
Diffstat (limited to 'src/Haddock/Utils.hs')
| -rw-r--r-- | src/Haddock/Utils.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Haddock/Utils.hs b/src/Haddock/Utils.hs index 53e8bba8..b8f32589 100644 --- a/src/Haddock/Utils.hs +++ b/src/Haddock/Utils.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE CPP #-} ----------------------------------------------------------------------------- -- | -- Module : Haddock.Utils @@ -428,7 +429,7 @@ markup m (DocUnorderedList ds) = markupUnorderedList m (map (markup m) ds) markup m (DocOrderedList ds) = markupOrderedList m (map (markup m) ds) markup m (DocDefList ds) = markupDefList m (map (markupPair m) ds) markup m (DocCodeBlock d) = markupCodeBlock m (markup m d) -markup m (DocURL url) = markupURL m url +markup m (DocHyperlink l) = markupHyperlink m l markup m (DocAName ref) = markupAName m ref markup m (DocPic img) = markupPic m img markup m (DocExamples e) = markupExample m e @@ -455,7 +456,7 @@ idMarkup = Markup { markupOrderedList = DocOrderedList, markupDefList = DocDefList, markupCodeBlock = DocCodeBlock, - markupURL = DocURL, + markupHyperlink = DocHyperlink, markupAName = DocAName, markupPic = DocPic, markupExample = DocExamples |