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