Exclude empty Dependency from tests

haskell · Aug 20, 2018 · 56a3c0d · 56a3c0d
1 parent be94cff
commit 56a3c0d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/cabal-install/tests/UnitTests/Distribution/Client/ArbitraryInstances.hs b/cabal-install/tests/UnitTests/Distribution/Client/ArbitraryInstances.hs
@@ -121,7 +121,7 @@ instance Arbitrary PackageName where
         packageChars  = filter isAlphaNum ['\0'..'\127']
 
 instance Arbitrary Dependency where
-    arbitrary = Dependency <$> arbitrary <*> arbitrary <*> arbitrary
+    arbitrary = Dependency <$> arbitrary <*> arbitrary <*> fmap getNonMEmpty arbitrary
 
 instance Arbitrary UnqualComponentName where
     -- same rules as package names