From 8fe13e0015d3e4a7190724c5c9a2442c1f176474 Mon Sep 17 00:00:00 2001
From: David Waern <david.waern@gmail.com>
Date: Wed, 13 Aug 2008 21:44:17 +0000
Subject: Follow move of package string functions from PackageConfig to Module

---
 src/Haddock/ModuleTree.hs | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'src/Haddock/ModuleTree.hs')

diff --git a/src/Haddock/ModuleTree.hs b/src/Haddock/ModuleTree.hs
index 2413f951..eccfd3e5 100644
--- a/src/Haddock/ModuleTree.hs
+++ b/src/Haddock/ModuleTree.hs
@@ -9,7 +9,11 @@ module Haddock.ModuleTree ( ModuleTree(..), mkModuleTree ) where
 import Haddock.DocName
 import GHC           ( HsDoc, Name )
 import Module        ( Module, moduleNameString, moduleName, modulePackageId )
-import PackageConfig ( packageIdString )
+#if __GLASGOW_HASKELL__ >= 609
+import Module (packageIdString)
+#else
+import PackageConfig (packageIdString)
+#endif
 
 data ModuleTree = Node String Bool (Maybe String) (Maybe (HsDoc Name)) [ModuleTree]
 
-- 
cgit v1.2.3