Fix file-missing error during patch-macos

Forgot to add Emacs.app to the end of the directories to be searched! Whoops!
2018-08-29 12:44:09 +02:00 · 2018-08-29 12:44:09 +02:00 · 902386b60f
commit 902386b60f
parent cab0ee33d1
1 changed files with 7 additions and 6 deletions
--- a/core/core-cli.el
+++ b/core/core-cli.el
@ -308,12 +308,13 @@ problems with doom."

 (defun doom--find-emacsapp-path ()
  (or (getenv "EMACS_APP_PATH")
-      (cl-find-if #'file-directory-p
-                  (list "/usr/local/opt/emacs"
-                        "/usr/local/opt/emacs-plus"
-                        "/Applications"
-                        "~/Applications")
-                  :key (lambda (x) (concat x "/Emacs.app")))
+      (cl-loop for dir in (list "/usr/local/opt/emacs"
+                                "/usr/local/opt/emacs-plus"
+                                "/Applications"
+                                "~/Applications")
+               for appdir = (concat dir "/Emacs.app")
+               if (file-directory-p appdir)
+               return appdir)
      (user-error "Couldn't find Emacs.app")))

 (defun doom-quickstart ()