kiss-lang/nat-archive-tool
1
0
Fork 0
Code Issues 4 Pull Requests Actions Packages Projects Releases Wiki Activity

Clearer error when the archive dir doesn't exist

Browse Source
This commit is contained in:
Nat Quayle Nelson
2021-10-07 20:50:34 -06:00
parent 4b7ed32684
commit 9fdf00248c
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/nat/Archive.kiss
View File

@@ -7,6 +7,8 @@
(let [entryDir (joinPath archiveDir "entries") (let [entryDir (joinPath archiveDir "entries")
componentDir (joinPath archiveDir "components") componentDir (joinPath archiveDir "components")
filesDir (joinPath archiveDir "files")] 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 entryDir)
(FileSystem.createDirectory componentDir) (FileSystem.createDirectory componentDir)
(FileSystem.createDirectory filesDir) (FileSystem.createDirectory filesDir)