From d045001eb7d000693e227dcddbb8ce7b1019aeb9 Mon Sep 17 00:00:00 2001
From: Kazu Yamamoto <kazu@iij.ad.jp>
Date: Wed, 20 Aug 2014 15:31:26 +0900
Subject: [PATCH] Letting "ghc-mod dumpsym" work on non-cabal directories.

---
 Language/Haskell/GhcMod/Cradle.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Language/Haskell/GhcMod/Cradle.hs b/Language/Haskell/GhcMod/Cradle.hs
index 3f2209d..c956b4e 100644
--- a/Language/Haskell/GhcMod/Cradle.hs
+++ b/Language/Haskell/GhcMod/Cradle.hs
@@ -54,14 +54,14 @@ plainCradle wdir = return Cradle {
         cradleCurrentDir = wdir
       , cradleRootDir    = wdir
       , cradleCabalFile  = Nothing
-      , cradlePkgDbStack = [GlobalDb]
+      , cradlePkgDbStack = [GlobalDb, UserDb]
       }
 
 -- Just for testing
 findCradleWithoutSandbox :: IO Cradle
 findCradleWithoutSandbox = do
     cradle <- findCradle
-    return cradle { cradlePkgDbStack = [GlobalDb]}
+    return cradle { cradlePkgDbStack = [GlobalDb]} -- FIXME
 
 ----------------------------------------------------------------