diff --git a/Makefile.am b/Makefile.am
index 7d3dfde774a90572d87addbf89f4e7f019768c8e..6f93423bd74bd376e923c821d6d65295aad25a17 100644
--- a/Makefile.am
+++ b/Makefile.am
@@ -1107,7 +1107,7 @@ hs-apidoc: $(HS_BUILT_SRCS)
 	then OPTGHC="--optghc=$(HTOOLS_NOCURL)"; \
 	else OPTGHC=""; \
 	fi; \
-	RELSRCS="$(HS_LIB_SRCS:htools/%=%)"; \
+	RELSRCS="$(HS_LIB_SRCS:htools/%=%)  $(HS_BUILT_SRCS:htools/%=%)"; \
 	for file in $$RELSRCS; do \
 		hfile=`echo $$file|sed 's/\\.hs$$//'`.html; \
 		$(HSCOLOUR) -css -anchor $$file > ../$(APIDOC_HS_DIR)/$$hfile ; \
diff --git a/autotools/convert-constants b/autotools/convert-constants
index ddca1fca8a2f161051951f7fd5581b7dbe2a9290..3f2b362d30e28c37abc52abb0fd42e2ef06a8a3f 100755
--- a/autotools/convert-constants
+++ b/autotools/convert-constants
@@ -60,15 +60,19 @@ def Convert():
     if not CONSTANT_RE.match(name):
       lines.append("-- Skipped %s, not constant" % name)
     elif isinstance(value, basestring):
+      lines.append("-- | Converted from Python constant %s" % name)
       lines.append("%s :: String" % hs_name)
       lines.append("%s = \"%s\"" % (hs_name, StringValueRules(value)))
     elif isinstance(value, int):
+      lines.append("-- | Converted from Python constant %s" % name)
       lines.append("%s :: Int" % hs_name)
       lines.append("%s = %d" % (hs_name, value))
     elif isinstance(value, long):
+      lines.append("-- | Converted from Python constant %s" % name)
       lines.append("%s :: Integer" % hs_name)
       lines.append("%s = %d" % (hs_name, value))
     elif isinstance(value, float):
+      lines.append("-- | Converted from Python constant %s" % name)
       lines.append("%s :: Double" % hs_name)
       lines.append("%s = %f" % (hs_name, value))
     else: