From ed9cafbf8f8baf1ff29237ba864fd7f548960b74 Mon Sep 17 00:00:00 2001 From: Michael Snoyman Date: Mon, 23 Apr 2012 15:25:11 +0300 Subject: [PATCH] Fix to-cabal script --- yesod-platform/to-cabal.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/yesod-platform/to-cabal.hs b/yesod-platform/to-cabal.hs index b5349cdf..2b78f94b 100644 --- a/yesod-platform/to-cabal.hs +++ b/yesod-platform/to-cabal.hs @@ -3,7 +3,7 @@ import Control.Applicative ((<$>)) main = do pkgs <- map (intercalate " == ") - . filter (\xs -> not $ ["parsec", "text"] `isPrefixOf` xs) + . filter (\xs -> not $ any (`isPrefixOf` xs) $ map return ["parsec", "text", "transformers", "mtl"]) . map words . filter (not . null) . lines