Distribution/Client/IndexUtils.hs: fixed warning on -Wall (unused res…

…ult)
gentoo-haskell · Dec 20, 2009 · 38cfd3b · 38cfd3b
1 parent aa29440
commit 38cfd3b
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/Distribution/Client/IndexUtils.hs b/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'