From 3b7d51d25a75335d5614a030472713c28e86676f Mon Sep 17 00:00:00 2001
From: Daniel Vigovszky <daniel.vigovszky@gmail.com>
Date: Fri, 24 Apr 2015 10:41:39 +0200
Subject: [PATCH] Removed unused function

---
 Language/Haskell/GhcMod/Cradle.hs | 7 -------
 1 file changed, 7 deletions(-)

diff --git a/Language/Haskell/GhcMod/Cradle.hs b/Language/Haskell/GhcMod/Cradle.hs
index e0a691a..7784631 100644
--- a/Language/Haskell/GhcMod/Cradle.hs
+++ b/Language/Haskell/GhcMod/Cradle.hs
@@ -111,13 +111,6 @@ getPackageDbStack :: FilePath -- ^ Project Directory (where the
 getPackageDbStack cdir =
     ([GlobalDb] ++) . maybe [UserDb] return <$> getSandboxDb cdir
 
--- Just for testing
-findCradleWithoutSandbox :: IO Cradle
-findCradleWithoutSandbox = do
-    cradle <- findCradle
-    return cradle { cradlePkgDbStack = [GlobalDb]} -- FIXME
-
-
 parseCradle :: FilePath -> IO [GhcPkgDb]
 parseCradle path = do
     source <- readFile path