@@ -119,7 +119,7 @@ readPackageSet PackageConfig{ set } = do
119 let dbFile = ".psc-package" </> fromText set </> ".set" </> "packages.json"
119 let dbFile = ".psc-package" </> fromText set </> ".set" </> "packages.json"
120 exists <- testfile dbFile
120 exists <- testfile dbFile
121 unless exists $ do
121 unless exists $ do
122− echo "packages.json does not exist"
122+ echo $ format (fp%" does not exist") dbFile
123 exit (ExitFailure 1)
123 exit (ExitFailure 1)
124 mdb <- Aeson.decodeStrict . encodeUtf8 <$> readTextFile dbFile
124 mdb <- Aeson.decodeStrict . encodeUtf8 <$> readTextFile dbFile
125 case mdb of
125 case mdb of