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)