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

[Paolo Capriotti]

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

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/8accd9c7a22f0ab6f199c0cae7bacce98dc76901

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

commit 8accd9c7a22f0ab6f199c0cae7bacce98dc76901
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