From: Ramakrishnan Muthukrishnan Date: Wed, 26 Jul 2017 12:01:22 +0000 (+0530) Subject: metainfotest: use the predicate shouldSatisfy to check for a condition X-Git-Url: https://git.rkrishnan.org/vdrive/listings/frontends/(%5B%5E?a=commitdiff_plain;h=b745c1b21a64a3677b75777996c81154e916c0a5;p=functorrent.git metainfotest: use the predicate shouldSatisfy to check for a condition --- diff --git a/test/MetainfoTests.hs b/test/MetainfoTests.hs index 824bb64..727de50 100644 --- a/test/MetainfoTests.hs +++ b/test/MetainfoTests.hs @@ -19,5 +19,5 @@ tests = hspec $ do case torrentToMetainfo fc of Left _ -> pending Right metainfo -> do - announceList metainfo `shouldNotBe` [] + announceList metainfo `shouldSatisfy` (not . null)