diff --git a/Distribution/Simple/Register.hs b/Distribution/Simple/Register.hs
index c934fb7d3525d52918155be86c3dedb82e2b1e2f..a3c0cf27fb357133d96101041b1452845edfb72b 100644
--- a/Distribution/Simple/Register.hs
+++ b/Distribution/Simple/Register.hs
@@ -270,7 +270,8 @@ mkInstalledPackageInfo pkg_descr lbi inplace = do
                         installDirTemplates = (installDirTemplates lbi) {
                           dataDirTemplate    = toPathTemplate pwd,
                           dataSubdirTemplate = toPathTemplate distPref,
-                          docDirTemplate     = toPathTemplate (pwd </> distPref </> "doc")
+                          docDirTemplate     = toPathTemplate (pwd </> distPref </> "doc"),
+                          htmlDirTemplate    = toPathTemplate (pwd </> distPref </> "doc" </> "html")
                         }
                       } NoCopyDest
 	(absinc,relinc) = partition isAbsolute (includeDirs bi)