diff --git a/src/StackRunAuto.hs b/src/StackRunAuto.hs
--- a/src/StackRunAuto.hs
+++ b/src/StackRunAuto.hs
@@ -76,9 +76,10 @@
     putStrLn $ "Finding package for " ++ m ++ "..."
     modulePackageCached m
 
+cached :: (Read b, Show b) => String -> (FilePath -> IO b) -> FilePath -> IO b
 cached name fn arg = do
     home <- getHomeDirectory
-    let cacheDir = home </> ".stack-run-auto" </> "module-packages"
+    let cacheDir = home </> ".stack-run-auto" </> name
         cachePth = cacheDir </> arg
     createDirectoryIfMissing True cacheDir
     exists <- doesFileExist cachePth
diff --git a/stack-run-auto.cabal b/stack-run-auto.cabal
--- a/stack-run-auto.cabal
+++ b/stack-run-auto.cabal
@@ -1,5 +1,5 @@
 name:                stack-run-auto
-version:             0.1.1.3
+version:             0.1.1.4
 synopsis:            Initial project template from stack
 description:         Please see README.md
 homepage:            http://github.com/yamadapc/stack-run-auto#readme