psc-package: display full path in 'packages.json does not exist' error message
commit8e3865b3eca53cca7a5cc6e82e3fef7fbd55f0fb
authorAndy Arvanitis <andyarvanitis@gmail.com>
dateSat 10 Dec 2016, 17:18 (10 years ago)
parentd727a36
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