Distribution/Client/IndexUtils.hs: fixed warning on -Wall (unused result)

4c7cde2b · Sergei Trofimovich · ffa35ce0 · 4c7cde2b
Commit 4c7cde2b authored Dec 20, 2009 by Sergei Trofimovich
--- a/cabal-install/Distribution/Client/IndexUtils.hs
+++ b/cabal-install/Distribution/Client/IndexUtils.hs
@@ -128,8 +128,8 @@ getAvailablePackages verbosity repos = do
  let (pkgs, prefs) = mconcat pkgss
      prefs' = Map.fromListWith intersectVersionRanges
                 [ (name, range) | Dependency name range <- prefs ]
-  evaluate pkgs
-  evaluate prefs'
+  _ <- evaluate pkgs
+  _ <- evaluate prefs'
  return AvailablePackageDb {
    packageIndex       = pkgs,
    packagePreferences = prefs'