X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=utils%2Fghc-pkg%2FMain.hs;fp=utils%2Fghc-pkg%2FMain.hs;h=8e08c4fb9701d468cbcedb3f005e2d04ee364927;hb=237fea9fd27a276f6674c76e2eeff0c6634576dd;hp=4e6b53193a54f9da7fd4db1f03eb611fb3c8aa9e;hpb=75f9f3559b9959f067c893ae3f7c89da7fd18813;p=ghc-hetmet.git

diff --git a/utils/ghc-pkg/Main.hs b/utils/ghc-pkg/Main.hs
index 4e6b531..8e08c4f 100644
--- a/utils/ghc-pkg/Main.hs
+++ b/utils/ghc-pkg/Main.hs
@@ -678,7 +678,8 @@ mungePackagePaths top_dir pkgroot pkg =
       libraryDirs = munge_paths (libraryDirs pkg),
       frameworkDirs = munge_paths (frameworkDirs pkg),
       haddockInterfaces = munge_paths (haddockInterfaces pkg),
-      haddockHTMLs = munge_urls (haddockHTMLs pkg)
+                     -- haddock-html is allowed to be either a URL or a file
+      haddockHTMLs = munge_path (munge_urls (haddockHTMLs pkg))
     }
   where
     munge_paths = map munge_path