[commit: Cabal] master: When marking failed reverse deps, don't include the package itself (d3fb635)

[Ian Lynagh]

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

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/d3fb6354b46ec8a5e1ad824f92b938a419f4ca32

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

commit d3fb6354b46ec8a5e1ad824f92b938a419f4ca32
Author: Duncan Coutts <duncan at haskell.org>
Date:   Thu Jun 5 00:36:56 2008 +0000

    When marking failed reverse deps, don't include the package itself
    Otherwise we end up saying packages failed because they depend
    on themselves which failed to install, which is silly.

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

 cabal-install/Hackage/InstallPlan.hs |    1 +
 1 files changed, 1 insertions(+), 0 deletions(-)

diff --git a/cabal-install/Hackage/InstallPlan.hs b/cabal-install/Hackage/InstallPlan.hs
index befccbd..28e1112 100644
--- a/cabal-install/Hackage/InstallPlan.hs
+++ b/cabal-install/Hackage/InstallPlan.hs
@@ -242,6 +242,7 @@ failed pkgid buildResult buildResult' plan = assert (invariant plan') plan'
 packagesThatDependOn :: InstallPlan a
                      -> PackageIdentifier -> [PackageIdentifier]
 packagesThatDependOn plan = map (planPkgIdOf plan)
+                          . tail
                           . Graph.reachable (planGraphRev plan)
                           . planVertexOf plan