DOOM New thread for: (company-glsl centered-window ac-php-core)
Debugger entered--Lisp error: (wrong-type-argument listp phpactor)
  car(phpactor)
  #f(compiled-function (cl-x cl-y) #<bytecode 0x40efba99>)(phpactor (company-box (20190122 1123) (20190311 1650)))
  sort(((treemacs-projectile (20190114 1634) (20190309 1812))) #f(compiled-function (cl-x cl-y) #<bytecode 0x40efba99>))
  cl-sort(((treemacs-projectile (20190114 1634) (20190309 1812))) string-lessp :key car)
  (let ((packages (cl-sort (cl-copy-list (doom-get-outdated-packages)) (function string-lessp) :key (function car)))) (cond ((not packages) (progn (princ (format (doom-color-apply 'green "Everything is up-to-date"))) (terpri)) nil) ((not (or auto-accept-p (y-or-n-p (format "%s packages will be updated:\n\n%s\n\nProceed?" (length packages) (let ((max-len (or (car (sort (mapcar (function (lambda (it) (length (symbol-name (car it))))) packages) (function >))) 10))) (mapconcat (function (lambda (pkg) (format (format "+ %%-%ds %%-%ds -> %%s" (+ max-len 2) 14) (symbol-name (car pkg)) (package-version-join (car (cdr pkg))) (package-version-join (car (cdr (cdr pkg))))))) packages "\n")))))) (user-error "Aborted!")) ((let (success) (let ((--dolist-tail-- packages) pkg) (while --dolist-tail-- (setq pkg (car --dolist-tail--)) (progn (princ (format "Updating %s" (car pkg))) (terpri)) (condition-case e (progn (progn (princ (format (let ((result (doom-update-package (car pkg) t))) (if result (progn (setq success t))) (doom-color-apply (if result 'green 'red) (if result "✓ DONE" "✕ FAILED"))))) (terpri))) ((debug quote user-error) (progn (princ (format (doom-color-apply 'bold (doom-color-apply 'red "  NOTICE: %s")) e)) (terpri))) ((debug quote file-error) (progn (princ (format (doom-color-apply 'bold (doom-color-apply 'red "  FILE ERROR: %s")) (error-message-string e))) (terpri)) (progn (princ (format "  Trying again...")) (terpri)) (cond (noninteractive (let ((old-fn (symbol-function 'write-region))) (let* ((vnew (function (lambda (&rest _)))) (vnew (function (lambda (file) (load file nil t)))) (vnew (function (lambda (&rest _)))) (vnew (function (lambda (start end filename &optional append visit lockname mustbenew) (if visit nil (setq visit 'no-message)) (funcall old-fn start end filename append visit lockname mustbenew)))) (old (symbol-function 'write-region)) (old (symbol-function 'message)) (old (symbol-function 'load-file)) (standard-output vnew)) (unwind-protect (progn (fset 'write-region vnew) (fset 'message vnew) (fset 'load-file vnew) (doom-refresh-packages-maybe t)) (fset 'write-region old) (fset 'message old) (fset 'load-file old))))) ((or doom-debug-mode debug-on-error debug-on-quit) (doom-refresh-packages-maybe t)) ((let ((inhibit-message t) (save-silently t)) (doom-refresh-packages-maybe t) (message "")))) (progn (princ (format (let ((result (doom-update-package (car pkg) t))) (if result (progn (setq success t))) (doom-color-apply (if result 'green 'red) (if result "✓ DONE" "✕ FAILED"))))) (terpri))) ((debug quote error) (progn (princ (format (doom-color-apply 'bold (doom-color-apply 'red "  FATAL ERROR: %s\n  Run again with the -d flag for details")) e)) (terpri)))) (setq --dolist-tail-- (cdr --dolist-tail--)))) (progn (princ (format (doom-color-apply 'bold (doom-color-apply 'green "Finished!")))) (terpri)) (if success (progn (set-file-times doom-packages-dir) (doom-delete-autoloads-file doom-package-autoload-file))) success))))
  doom-packages-update(nil)
  funcall(doom-packages-update nil)
  (if (funcall fn doom-auto-accept) (progn (doom-reload-package-autoloads)))
  doom--do(doom-packages-update)
  (lambda (args) (ignore args) (doom--do (function doom-packages-update)))(nil)
  funcall((lambda (args) (ignore args) (doom--do (function doom-packages-update))) nil)
  (if show-help (apply (function doom--dispatch-help) command desc args) (funcall body args))
  (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq (car --cl-keys--) '(:desc :body :allow-other-keys)) (setq --cl-keys-- (cdr (cdr --cl-keys--)))) ((car (cdr (memq ':allow-other-keys --cl-rest--))) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:desc :body)" (car --cl-keys--)))))) (if show-help (apply (function doom--dispatch-help) command desc args) (funcall body args)))
  (let* ((--cl-rest-- (let ((sym (intern cmd))) (or (assq sym doom--dispatch-command-alist) (assq (cdr (assq sym doom--dispatch-alias-alist)) doom--dispatch-command-alist) (user-error "Invalid command: %s" sym)))) (command (if --cl-rest-- (car-safe (prog1 --cl-rest-- (setq --cl-rest-- (cdr --cl-rest--)))) (signal 'wrong-number-of-arguments (list nil (length --cl-rest--))))) (desc (car (cdr (plist-member --cl-rest-- ':desc)))) (body (car (cdr (plist-member --cl-rest-- ':body))))) (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq (car --cl-keys--) '(:desc :body :allow-other-keys)) (setq --cl-keys-- (cdr (cdr --cl-keys--)))) ((car (cdr (memq ':allow-other-keys --cl-rest--))) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:desc :body)" (car --cl-keys--)))))) (if show-help (apply (function doom--dispatch-help) command desc args) (funcall body args))))
  doom-dispatch("u" nil)
  (condition-case e (doom-dispatch (car args) (cdr args)) (user-error (signal (car e) (cdr e))) ((debug error) (message "--------------------------------------------------\n") (message "There was an unexpected error:") (message "  %s (%s)" (get (car e) 'error-message) (car e)) (let ((--dolist-tail-- (cdr e)) item) (while --dolist-tail-- (setq item (car --dolist-tail--)) (message "  %s" item) (setq --dolist-tail-- (cdr --dolist-tail--)))) (if debug-on-error nil (message (concat "\nRun the command again with the -d (or --debug) option to enable debug\n" "mode and, hopefully, generate a stack trace. If you decide to file a bug\n" "report, please include it!\n\n" "Emacs outputs to standard error, so you'll need to redirect stderr to\n" "stdout to pipe this to a file or clipboard!\n\n" "  e.g. doom -d install 2>&1 | clipboard-program")) (signal 'doom-error e))))
  (let ((default-directory emacs-dir)) (setq argv nil noninteractive 'doom) (condition-case e (doom-dispatch (car args) (cdr args)) (user-error (signal (car e) (cdr e))) ((debug error) (message "--------------------------------------------------\n") (message "There was an unexpected error:") (message "  %s (%s)" (get (car e) 'error-message) (car e)) (let ((--dolist-tail-- (cdr e)) item) (while --dolist-tail-- (setq item (car --dolist-tail--)) (message "  %s" item) (setq --dolist-tail-- (cdr --dolist-tail--)))) (if debug-on-error nil (message (concat "\nRun the command again with the -d (or --debug) option to enable debug\n" "mode and, hopefully, generate a stack trace. If you decide to file a bug\n" "report, please include it!\n\n" "Emacs outputs to standard error, so you'll need to redirect stderr to\n" "stdout to pipe this to a file or clipboard!\n\n" "  e.g. doom -d install 2>&1 | clipboard-program")) (signal 'doom-error e)))))
  (cond ((not noninteractive) (doom|run-all-startup-hooks)) ((and (not (cdr args)) (member (car args) '("help" "h"))) (usage)) ((not args) (message "No command detected, aborting!\n\nRun %s help for documentation." (file-name-nondirectory load-file-name))) ((let ((default-directory emacs-dir)) (setq argv nil noninteractive 'doom) (condition-case e (doom-dispatch (car args) (cdr args)) (user-error (signal (car e) (cdr e))) ((debug error) (message "--------------------------------------------------\n") (message "There was an unexpected error:") (message "  %s (%s)" (get (car e) 'error-message) (car e)) (let ((--dolist-tail-- (cdr e)) item) (while --dolist-tail-- (setq item (car --dolist-tail--)) (message "  %s" item) (setq --dolist-tail-- (cdr --dolist-tail--)))) (if debug-on-error nil (message (concat "\nRun the command again with the -d (or --debug) option to enable debug\n" "mode and, hopefully, generate a stack trace. If you decide to file a bug\n" "report, please include it!\n\n" "Emacs outputs to standard error, so you'll need to redirect stderr to\n" "stdout to pipe this to a file or clipboard!\n\n" "  e.g. doom -d install 2>&1 | clipboard-program")) (signal 'doom-error e)))))))
  (let ((args (cdr (cdr (cdr command-line-args)))) (emacs-dir (or (getenv "EMACSDIR") (expand-file-name "../" (file-name-directory (file-truename load-file-name)))))) (while (condition-case nil (progn (string-prefix-p "-" (car args))) (error nil)) (let* ((val (car-safe (prog1 args (setq args (cdr args)))))) (cond ((member val '("--help" "-h")) (setq args (cons "help" args))) ((member val '("--debug" "-d")) (setenv "DEBUG" "1") (message "Debug mode on")) ((member val '("--insecure" "-i")) (setenv "INSECURE" "1") (message "Insecure mode on")) ((member val '("--private" "-p")) (setq doom-private-dir (expand-file-name (concat (car-safe (prog1 args (setq args (cdr args)))) "/"))) (setenv "DOOMDIR" doom-private-dir) (message "DOOMDIR changed to %s" doom-private-dir) (or (file-directory-p doom-private-dir) (message "Warning: %s does not exist" (abbreviate-file-name doom-private-dir)))) ((member val '("--emacsd" "-e")) (setq emacs-dir (expand-file-name (concat (car-safe (prog1 args (setq args (cdr args)))) "/"))) (message "Emacs directory changed to %s" emacs-dir)) ((member val '("--yes" "-y")) (setenv "YES" "1") (message "Auto-yes mode on")) (t nil)))) (or (file-directory-p emacs-dir) (error "%s does not exist" emacs-dir)) (load (expand-file-name "init" emacs-dir) nil 'nomessage) (cond ((not noninteractive) (doom|run-all-startup-hooks)) ((and (not (cdr args)) (member (car args) '("help" "h"))) (usage)) ((not args) (message "No command detected, aborting!\n\nRun %s help for documentation." (file-name-nondirectory load-file-name))) ((let ((default-directory emacs-dir)) (setq argv nil noninteractive 'doom) (condition-case e (doom-dispatch (car args) (cdr args)) (user-error (signal (car e) (cdr e))) ((debug error) (message "--------------------------------------------------\n") (message "There was an unexpected error:") (message "  %s (%s)" (get (car e) 'error-message) (car e)) (let ((--dolist-tail-- (cdr e)) item) (while --dolist-tail-- (setq item (car --dolist-tail--)) (message "  %s" item) (setq --dolist-tail-- (cdr --dolist-tail--)))) (if debug-on-error nil (message (concat "\nRun the command again with the -d (or --debug) option to enable debug\n" "mode and, hopefully, generate a stack trace. If you decide to file a bug\n" "report, please include it!\n\n" "Emacs outputs to standard error, so you'll need to redirect stderr to\n" "stdout to pipe this to a file or clipboard!\n\n" "  e.g. doom -d install 2>&1 | clipboard-program")) (signal 'doom-error e))))))))
  eval-buffer(#<buffer  *load*> nil "/Users/codywilson/.emacs.d/bin/doom" nil t)  ; Reading at buffer position 4966
  load-with-code-conversion("/Users/codywilson/.emacs.d/bin/doom" "/Users/codywilson/.emacs.d/bin/doom" nil t)
  load("/Users/codywilson/.emacs.d/bin/doom" nil t t)
  command-line-1(("-scriptload" "./doom" "--" "-d" "u"))
  command-line()
  normal-top-level()