From be129cadc7c18d2d26670a8a61bf473fa9bff6b5 Mon Sep 17 00:00:00 2001 From: mainzelm Date: Tue, 19 Feb 2002 17:18:45 +0000 Subject: [PATCH] Sometimes some OSs (OS X, Linux, Solaris) report EISDIR when unlinking a file. --- scsh/filesys.scm | 1 + 1 file changed, 1 insertion(+) diff --git a/scsh/filesys.scm b/scsh/filesys.scm index 9a5e565..74a0e40 100644 --- a/scsh/filesys.scm +++ b/scsh/filesys.scm @@ -17,6 +17,7 @@ (or (with-errno-handler ; Assume it's a file and try. ((err data) ((errno/perm) #f) ; Return #f if directory + ((errno/isdir) #f) ((errno/noent) #t)) (delete-file fname) #t)