[haddock @ 2002-07-25 14:37:28 by simonmar]

Patch to allow simple hyperlinking to an arbitrary location in another
module's documentation, from Volker Stolz.

Now in a doc comment:

  #foo#

creates

  <a name="foo"></a>

And you can use the form "M\#foo" to hyperlink to the label 'foo' in
module 'M'.  Note that the backslash is necessary for now.

1 files changed, 2 insertions, 1 deletions

diff --git a/src/HaddockRename.hs b/src/HaddockRename.hs
index 2717e605..77983e02 100644
--- a/src/HaddockRename.hs
+++ b/src/HaddockRename.hs
@@ -187,7 +187,8 @@ markupRename = Markup {
   markupUnorderedList = liftM DocUnorderedList . sequence,
   markupOrderedList   = liftM DocOrderedList . sequence,
   markupCodeBlock     = liftM DocCodeBlock,
-  markupURL	      = return . DocURL
+  markupURL	      = return . DocURL,
+  markupAName	      = return . DocAName
   }
 
 renameDoc :: Doc -> RnM Doc