[commit: Cabal] : Make InstalledPackage an instance of PackageFixedDeps (275e91a)

[Ian Lynagh]

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

On branch  : 

http://hackage.haskell.org/trac/ghc/changeset/275e91a16640a654bd4847bf659cd6e3f1ee68f8

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

commit 275e91a16640a654bd4847bf659cd6e3f1ee68f8
Author: Duncan Coutts <duncan at haskell.org>
Date:   Sun Oct 5 01:27:41 2008 +0000

    Make InstalledPackage an instance of PackageFixedDeps

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

 .../Client/Dependency/TopDown/Types.hs             |    6 +++++-
 1 files changed, 5 insertions(+), 1 deletions(-)

diff --git a/cabal-install/Distribution/Client/Dependency/TopDown/Types.hs b/cabal-install/Distribution/Client/Dependency/TopDown/Types.hs
index e013528..ed3d5db 100644
--- a/cabal-install/Distribution/Client/Dependency/TopDown/Types.hs
+++ b/cabal-install/Distribution/Client/Dependency/TopDown/Types.hs
@@ -17,7 +17,8 @@ import Distribution.Client.Types
 
 import Distribution.InstalledPackageInfo (InstalledPackageInfo)
 import Distribution.Package
-         ( PackageIdentifier, Dependency, Package(packageId) )
+         ( PackageIdentifier, Dependency
+         , Package(packageId), PackageFixedDeps(depends) )
 import Distribution.PackageDescription
          ( FlagAssignment )
 
@@ -60,6 +61,9 @@ data SemiConfiguredPackage
 instance Package InstalledPackage where
   packageId (InstalledPackage p _ _) = packageId p
 
+instance PackageFixedDeps InstalledPackage where
+  depends (InstalledPackage _ _ deps) = deps
+
 instance Package UnconfiguredPackage where
   packageId (UnconfiguredPackage p _ _) = packageId p