From 2f1443da29cb24211b68ac8baa3b42b9c9a9ae72 Mon Sep 17 00:00:00 2001
From: Michael Snoyman <michael@snoyman.com>
Date: Wed, 27 Aug 2014 18:52:39 +0300
Subject: [PATCH] Fix for extra tarballs

---
 Stackage/LoadDatabase.hs | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/Stackage/LoadDatabase.hs b/Stackage/LoadDatabase.hs
index cabf65e4..d54cabd0 100644
--- a/Stackage/LoadDatabase.hs
+++ b/Stackage/LoadDatabase.hs
@@ -111,9 +111,8 @@ loadPackageDB settings coreMap core deps underlay = do
            $ simpleParse $ reverse v'
         case Map.lookup p deps of
             Just (vrange, _)
-                | withinRange v vrange ->
-                    findCabalAndAddPackage tarball p v pdb $ Tar.read $ GZip.decompress lbs
-            _ -> return pdb
+                | not $ withinRange v vrange -> return pdb
+            _ -> findCabalAndAddPackage tarball p v pdb $ Tar.read $ GZip.decompress lbs
       where
         tarball = selectTarballDir settings </> tarball' <.> "tar.gz"