Clearer error when the archive dir doesn't exist

This commit is contained in:
2021-10-07 20:50:34 -06:00
parent ee27f5e4ec
commit 6bf6dc5515

View File

@@ -7,6 +7,8 @@
(let [entryDir (joinPath archiveDir "entries")
componentDir (joinPath archiveDir "components")
filesDir (joinPath archiveDir "files")]
(assert (FileSystem.exists archiveDir) "Archive directory $archiveDir does not exist")
(assert (FileSystem.isDirectory archiveDir) "$archiveDir is not a directory")
(FileSystem.createDirectory entryDir)
(FileSystem.createDirectory componentDir)
(FileSystem.createDirectory filesDir)