From 83db2194e797b56a582bada7e7f4e54576d1151e Mon Sep 17 00:00:00 2001 From: Isaac Dupree Date: Sun, 23 Aug 2009 23:20:11 +0000 Subject: GhcUtils: ghc >= 6.10 --- src/Haddock/GhcUtils.hs | 4 ---- 1 file changed, 4 deletions(-) diff --git a/src/Haddock/GhcUtils.hs b/src/Haddock/GhcUtils.hs index 62b370bb..99b707df 100644 --- a/src/Haddock/GhcUtils.hs +++ b/src/Haddock/GhcUtils.hs @@ -46,11 +46,7 @@ modulePackageString = packageIdString . modulePackageId modulePackageInfo :: Module -> (String, [Char]) modulePackageInfo modu = case unpackPackageId pkg of Nothing -> (packageIdString pkg, "") -#if __GLASGOW_HASKELL__ >= 609 Just x -> (display $ pkgName x, showVersion (pkgVersion x)) -#else - Just x -> (pkgName x, showVersion (pkgVersion x)) -#endif where pkg = modulePackageId modu -- cgit v1.2.3