From be94cff82f11d498aa2e62c7e50fe8c68109886c Mon Sep 17 00:00:00 2001 From: Francesco Gazzetta Date: Mon, 20 Aug 2018 11:52:45 +0200 Subject: [PATCH] Monad -> Applicative --- Cabal/Distribution/Types/Dependency.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Cabal/Distribution/Types/Dependency.hs b/Cabal/Distribution/Types/Dependency.hs index 9111aa80f15..631402323c4 100644 --- a/Cabal/Distribution/Types/Dependency.hs +++ b/Cabal/Distribution/Types/Dependency.hs @@ -64,7 +64,7 @@ instance Parsec Dependency where parsec = do name <- lexemeParsec libs <- option [LMainLibName] - $ (char ':' *> spaces >>) + $ (char ':' *> spaces *>) $ between (char '{' *> spaces) (spaces <* char '}') $ parsecCommaList (makeLib name <$> parsecUnqualComponentName) ver <- parsec <|> pure anyVersion @@ -76,7 +76,7 @@ instance Text Dependency where parse = do name <- parse Parse.skipSpaces libs <- option [LMainLibName] - $ (char ':' >>) + $ (char ':' *>) $ between (char '{') (char '}') $ parsecCommaList (makeLib name <$> parsecUnqualComponentName) Parse.skipSpaces