From daf547882459ede886df82911647c3f0926b71e3 Mon Sep 17 00:00:00 2001
From: Alex Shinn <ashinn@users.noreply.github.com>
Date: Thu, 3 Oct 2013 12:12:16 +0900
Subject: [PATCH] Fixing failed opendir handling from 1725:739f90999b17.

---
 lib/chibi/filesystem.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/chibi/filesystem.scm b/lib/chibi/filesystem.scm
index d4a23a7a..a07ac59c 100644
--- a/lib/chibi/filesystem.scm
+++ b/lib/chibi/filesystem.scm
@@ -50,6 +50,7 @@
        ((file-directory? file)
         (let ((d (opendir file)))
           (if (not d)
+              acc
               (let lp ((acc acc))
                 (let ((e (readdir d)))
                   (cond