From ca7b0001ed6895f0fad19f53995fe577c5666a61 Mon Sep 17 00:00:00 2001
From: Kazu Yamamoto <kazu@iij.ad.jp>
Date: Wed, 20 Aug 2014 15:36:52 +0900
Subject: [PATCH] fix a test case.

---
 test/CradleSpec.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test/CradleSpec.hs b/test/CradleSpec.hs
index 2bf54e1..dbad36d 100644
--- a/test/CradleSpec.hs
+++ b/test/CradleSpec.hs
@@ -21,7 +21,7 @@ spec = do
                     cradleCurrentDir = curDir
                   , cradleRootDir    = curDir
                   , cradleCabalFile  = Nothing
-                  , cradlePkgDbStack = [GlobalDb]
+                  , cradlePkgDbStack = [GlobalDb,UserDb]
                   }
         it "finds a cabal file and a sandbox" $ do
             cwd <- getCurrentDirectory