diff options
| author | Isaac Dupree <id@isaac.cedarswampstudios.org> | 2009-08-23 23:20:11 +0000 |
|---|---|---|
| committer | Isaac Dupree <id@isaac.cedarswampstudios.org> | 2009-08-23 23:20:11 +0000 |
| commit | 83db2194e797b56a582bada7e7f4e54576d1151e (patch) | |
| tree | fc0a7ea6da5dee40f026aea06782e6fbf21b6611 | |
| parent | 08bb108b7f682686f15291dfbe73e1f5e11c1761 (diff) | |
GhcUtils: ghc >= 6.10
| -rw-r--r-- | src/Haddock/GhcUtils.hs | 4 |
1 files changed, 0 insertions, 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 |