[commit: Cabal] master: Eliminate local definition of utility (333857b)

[Ian Lynagh]

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

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/333857b9df98ff952081bbab55803d69f915939c

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

commit 333857b9df98ff952081bbab55803d69f915939c
Author: Duncan Coutts <duncan at community.haskell.org>
Date:   Sun Mar 27 13:42:32 2011 +0000

    Eliminate local definition of utility

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

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

diff --git a/cabal-install/Distribution/Client/Dependency/TopDown.hs b/cabal-install/Distribution/Client/Dependency/TopDown.hs
index 81e3662..4390218 100644
--- a/cabal-install/Distribution/Client/Dependency/TopDown.hs
+++ b/cabal-install/Distribution/Client/Dependency/TopDown.hs
@@ -33,7 +33,7 @@ import Distribution.Client.PackageIndex (PackageIndex)
 import Distribution.Package
          ( PackageName(..), PackageId, Package(..), packageVersion, packageName
          , Dependency(Dependency), thisPackageVersion, notThisPackageVersion
-         , PackageFixedDeps(depends) )
+         , simplifyDependency, PackageFixedDeps(depends) )
 import Distribution.PackageDescription
          ( PackageDescription(buildDepends) )
 import Distribution.Client.PackageUtils
@@ -756,9 +756,6 @@ displayVer = display . simplifyVersionRange
 displayDep :: Dependency -> String
 displayDep = display . simplifyDependency
 
-simplifyDependency :: Dependency -> Dependency
-simplifyDependency (Dependency name range) =
-  Dependency name (simplifyVersionRange range)
 
 -- ------------------------------------------------------------
 -- * Utils