[commit: Cabal] master: Remove unused listInstalledPackages, replaced by LocalIndex.read (1b2210d)
Ian Lynagh
igloo at earth.li
Fri Jun 24 01:49:59 CEST 2011
Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal
On branch : master
http://hackage.haskell.org/trac/ghc/changeset/1b2210df6caa292376ed4a5c8194c631cc1e982a
>---------------------------------------------------------------
commit 1b2210df6caa292376ed4a5c8194c631cc1e982a
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