From 0905f4c6c3397e1461e47018145028cff9433947 Mon Sep 17 00:00:00 2001 From: Michael Fellinger Date: Tue, 8 Aug 2023 18:26:34 +0200 Subject: [PATCH] fix cabal plan style: inplace --- src/Strategy/Haskell/Cabal.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/Strategy/Haskell/Cabal.hs b/src/Strategy/Haskell/Cabal.hs index d7f7ced897..eac13db88b 100644 --- a/src/Strategy/Haskell/Cabal.hs +++ b/src/Strategy/Haskell/Cabal.hs @@ -95,6 +95,7 @@ data InstallPlan = InstallPlan data PlanStyle = Local + | Inplace | Global deriving (Eq, Ord, Show) @@ -134,6 +135,7 @@ isDirectDep InstallPlan{..} = planStyle == Just Local && planType == Configured parsePlanStyle :: MonadFail f => Text -> f PlanStyle parsePlanStyle style = case Text.toLower style of "global" -> pure Global + "inplace" -> pure Inplace "local" -> pure Local _ -> fail $ "unknown install plan style" ++ toString style