Merge pull request #2473 from pure11/psc-package
psc-package: display full path in 'packages.json does not exist' error messsage
commite0d6ffcf4eed51475a41ef87f108ec27f5ef9ee0
authorPhil Freeman <paf31@cantab.net>
dateSat 10 Dec 2016, 17:59 (10 years ago)
parent93a52e2599d49e
psc-package/Main.hs+1−1
@@ -119,7 +119,7 @@ readPackageSet PackageConfig{ set } = do
119119 let dbFile = ".psc-package" </> fromText set </> ".set" </> "packages.json"
120120 exists <- testfile dbFile
121121 unless exists $ do
122− echo "packages.json does not exist"
122+ echo $ format (fp%" does not exist") dbFile
123123 exit (ExitFailure 1)
124124 mdb <- Aeson.decodeStrict . encodeUtf8 <$> readTextFile dbFile
125125 case mdb of