From bd28310e5941085f8b118a8b706693e1a602fd86 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Daniel=20Gr=C3=B6ber?= <dxld@darkboxed.org>
Date: Tue, 12 Aug 2014 00:02:39 +0200
Subject: [PATCH] Don't fall back to sandbox if cabal file failes to parse

---
 Language/Haskell/GhcMod/Monad.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/Language/Haskell/GhcMod/Monad.hs b/Language/Haskell/GhcMod/Monad.hs
index a23a411..36aabdd 100644
--- a/Language/Haskell/GhcMod/Monad.hs
+++ b/Language/Haskell/GhcMod/Monad.hs
@@ -49,7 +49,6 @@ import Language.Haskell.GhcMod.Types
 import Language.Haskell.GhcMod.Cradle
 import Language.Haskell.GhcMod.DynFlags
 import Language.Haskell.GhcMod.GhcPkg
-import Language.Haskell.GhcMod.GHCChoice
 import Language.Haskell.GhcMod.CabalApi
 import qualified Language.Haskell.GhcMod.Gap as Gap
 
@@ -200,7 +199,7 @@ initializeFlagsWithCradle :: GhcMonad m
         -> Cradle
         -> m ()
 initializeFlagsWithCradle opt c
-  | cabal     = withCabal |||> withSandbox
+  | cabal     = withCabal
   | otherwise = withSandbox
   where
     mCradleFile = cradleCabalFile c