mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-02-04 11:19:10 +00:00
Code Issues 1 Releases Wiki Activity

When directory isn't empty, print what is in it.

Browse Source
This commit is contained in:
Calvin Rose 2024-05-26 09:31:26 -05:00
parent 6cd35ed9c8
commit 074ae4fc0d
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/boot/boot.janet
View File

@ -4038,7 +4038,10 @@
(def s (sep)) (def s (sep))
(each y (os/dir x) (each y (os/dir x)
(rmrf (string x s y))) (rmrf (string x s y)))
(os/rmdir x)) (try
(os/rmdir x)
([e f] (debug/stacktrace f e)
(each y (os/dir x) (eprint " - " y)))))
(os/rm x)) (os/rm x))
nil) nil)