From 60a45e7f430f2b6817650452e0939f4dac7ad577 Mon Sep 17 00:00:00 2001
From: Yitzchak Gale <gale@sefer.org>
Date: Sun, 14 Feb 2010 16:03:46 +0000
Subject: Do not generate illegal character in HTML ID attribute.

---
 src/Haddock/Backends/Html.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Haddock')

diff --git a/src/Haddock/Backends/Html.hs b/src/Haddock/Backends/Html.hs
index 05cddcac..0072abd0 100644
--- a/src/Haddock/Backends/Html.hs
+++ b/src/Haddock/Backends/Html.hs
@@ -399,7 +399,7 @@ mkNode ss (Node s leaf pkg short ts) depth id_ = htmlNode
     (s':ss') = reverse (s:ss)
 	 -- reconstruct the module name
     
-    id_s = "n:" ++ show id_
+    id_s = "n." ++ show id_
     
     (sub_tree,id') = genSubTree emptyTable (id_+1) ts
     
-- 
cgit v1.2.3