[commit: Cabal] master: Slightly better lhc support. (5c28093)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/5c280937ecb1974ca6fd44b9dcc51d31d7571355

>---------------------------------------------------------------

commit 5c280937ecb1974ca6fd44b9dcc51d31d7571355
Author: Lemmih <lemmih at gmail.com>
Date:   Fri Nov 21 03:43:38 2008 +0000

    Slightly better lhc support.

>---------------------------------------------------------------

 cabal-install/Distribution/Client/Dependency.hs |    6 ++++--
 1 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/cabal-install/Distribution/Client/Dependency.hs b/cabal-install/Distribution/Client/Dependency.hs
index 3c6ee4b..86cc587 100644
--- a/cabal-install/Distribution/Client/Dependency.hs
+++ b/cabal-install/Distribution/Client/Dependency.hs
@@ -43,7 +43,7 @@ import Distribution.Package
 import Distribution.Version
          ( VersionRange(AnyVersion), orLaterVersion )
 import Distribution.Compiler
-         ( CompilerId )
+         ( CompilerId(..), CompilerFlavor(LHC) )
 import Distribution.System
          ( OS, Arch )
 import Distribution.Simple.Utils (comparing)
@@ -155,7 +155,9 @@ dependencyResolver
   -> Progress String String InstallPlan
 dependencyResolver resolver os arch comp installed available pref deps =
   let installed' = hideBrokenPackages installed
-      available' = hideBasePackage available
+      available' = case comp of -- Ugly hack to support LHC.
+                     CompilerId LHC _ -> available
+                     _                -> hideBasePackage available
    in fmap toPlan
     $ resolver os arch comp installed' available' preference deps