Ignore non-existent directories

emacs-php · Apr 10, 2017 · f98deb4 · f98deb4
1 parent 5f3953b
commit f98deb4
Showing 1 changed file with 7 additions and 6 deletions.
diff --git a/ede-php-autoload/class-loader/core.el b/ede-php-autoload/class-loader/core.el
@@ -95,12 +95,13 @@ Basically, it returns PROJECT-ROOT/{NS-DIRECTORIES}/RELATIVE-PATH/{PREFIX}*"
                                dir
                              (expand-file-name dir project-root))
               full-dir (expand-file-name relative-path absolute-dir)
-              files (append files (directory-files
-                                   full-dir
-                                   nil
-                                   (concat "^" (if (string= prefix "")
-                                                   "[^.]"
-                                                   (regexp-quote prefix)))))))
+              files (when (file-exists-p full-dir)
+                      (append files (directory-files
+                                     full-dir
+                                     nil
+                                     (concat "^" (if (string= prefix "")
+                                                     "[^.]"
+                                                   (regexp-quote prefix))))))))
     files))
 
 (defun ede-php-autoload--ensure-list (list-or-element)