From 83db2194e797b56a582bada7e7f4e54576d1151e Mon Sep 17 00:00:00 2001
From: Isaac Dupree <id@isaac.cedarswampstudios.org>
Date: Sun, 23 Aug 2009 23:20:11 +0000
Subject: GhcUtils: ghc >= 6.10
---
src/Haddock/GhcUtils.hs | 4 ----
1 file changed, 4 deletions(-)
(limited to 'src/Haddock')
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