Fix #139: don't create a connfiguration automatically if not found

purescript · Mar 15, 2019 · 95865cc · 95865cc
1 parent 0b4a881
commit 95865cc
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 1 deletion.
diff --git a/app/Spago/Config.hs b/app/Spago/Config.hs
@@ -100,7 +100,8 @@ parseConfig dhallText = do
 ensureConfig :: IO Config
 ensureConfig = do
  exists <- T.testfile path
- T.unless exists $ makeConfig False
+ T.unless exists $ do
+ die $ Messages.cannotFindConfig
  PackageSet.ensureFrozen
  configText <- T.readTextFile path
  try (parseConfig configText) >>= \case

diff --git a/app/Spago/Messages.hs b/app/Spago/Messages.hs
@@ -4,6 +4,14 @@ import Data.Text (Text)
 import qualified Data.Text as Text
 
 
+cannotFindConfig :: Text
+cannotFindConfig = makeMessage
+ [ "There's no " <> surroundQuote "spago.dhall" <> "in your current location."
+ , ""
+ , "If you already have a spago project you might be in the wrong subdirectory,"
+ , "otherwise you might want to run `spago init` to initialize a new project."
+ ]
+
 foundExistingProject :: Text -> Text
 foundExistingProject pathText = makeMessage
  [ "Found " <> pathText <> ": it looks like there's already a project here."