[commit: Cabal] master: Remove unused listInstalledPackages, replaced by LocalIndex.read (cff3021)
Paolo Capriotti
p.capriotti at gmail.com
Mon May 7 23:58:29 CEST 2012
Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal
On branch : master
http://hackage.haskell.org/trac/ghc/changeset/cff3021e59fbad4953d84415a4955a7aac9322f4
>---------------------------------------------------------------
commit cff3021e59fbad4953d84415a4955a7aac9322f4
Author: Duncan Coutts <duncan at haskell.org>
Date: Fri Jan 18 22:13:09 2008 +0000
Remove unused listInstalledPackages, replaced by LocalIndex.read
>---------------------------------------------------------------
cabal-install/Hackage/Config.hs | 11 +----------
1 files changed, 1 insertions(+), 10 deletions(-)
diff --git a/cabal-install/Hackage/Config.hs b/cabal-install/Hackage/Config.hs
index c1de1b6..0a448ca 100644
--- a/cabal-install/Hackage/Config.hs
+++ b/cabal-install/Hackage/Config.hs
@@ -15,7 +15,6 @@ module Hackage.Config
, savedConfigToConfigFlags
, configRepos
, configPackageDB
- , listInstalledPackages
, defaultConfigFile
, loadConfig
, showConfig
@@ -32,13 +31,10 @@ import Text.PrettyPrint.HughesPJ (text)
import Distribution.Compat.ReadP (ReadP, char, munch1, readS_to_P)
import Distribution.Compiler (CompilerFlavor(..), defaultCompilerFlavor)
-import Distribution.Package (PackageIdentifier(..))
import Distribution.PackageDescription (ParseResult(..))
import Distribution.ParseUtils (FieldDescr(..), simpleField, listField, liftField, field)
-import Distribution.Simple.Compiler (Compiler, PackageDB(..))
-import Distribution.Simple.Configure (getInstalledPackages)
+import Distribution.Simple.Compiler (PackageDB(..))
import Distribution.Simple.InstallDirs (InstallDirs(..), PathTemplate, toPathTemplate)
-import Distribution.Simple.Program (ProgramConfiguration)
import Distribution.Simple.Setup (Flag(..), toFlag, fromFlag, fromFlagOrDefault)
import qualified Distribution.Simple.Setup as Cabal
import Distribution.Verbosity (Verbosity, normal)
@@ -49,11 +45,6 @@ import Hackage.Utils (readFileIfExists)
import Distribution.Simple.Utils (notice, warn)
-listInstalledPackages :: Verbosity -> PackageDB -> Compiler -> ProgramConfiguration -> IO [PackageIdentifier]
-listInstalledPackages verbosity packageDB comp conf =
- do Just ipkgs <- getInstalledPackages verbosity comp packageDB conf
- return ipkgs
-
--
-- * Configuration saved in the config file
--
More information about the Cvs-libraries
mailing list