Skip to content

Instantly share code, notes, and snippets.

@hackervera
Created November 1, 2016 22:16
Show Gist options
  • Save hackervera/de9b886eb16466965b6f69227a57ecea to your computer and use it in GitHub Desktop.
Save hackervera/de9b886eb16466965b6f69227a57ecea to your computer and use it in GitHub Desktop.
Debugger entered--Lisp error: (void-function dotspacemacs/layers)
(dotspacemacs/layers)
(let (dotspacemacs-configuration-layer-path dotspacemacs-configuration-layers dotspacemacs-additional-packages dotspacemacs-excluded-packages dotspacemacs-install-packages (passed-tests 0) (total-tests 0)) (load dotspacemacs-filepath) (dotspacemacs/layers) (spacemacs//test-list (quote stringp) (quote dotspacemacs-configuration-layer-path) "is a string" "path") (spacemacs//test-list (quote file-directory-p) (quote dotspacemacs-configuration-layer-path) "exists in filesystem" "path") (setq dotspacemacs-configuration-layers (mapcar (function (lambda (l) (if (listp l) (car l) l))) dotspacemacs-configuration-layers)) (spacemacs//test-list (quote configuration-layer/get-layer-path) (quote dotspacemacs-configuration-layers) "can be found" "layer") (insert (format (concat "** RESULTS: " "[[file:%s::dotspacemacs/layers][dotspacemacs/layers]] " "passed %s out of %s tests\n") dotspacemacs-filepath passed-tests total-tests)) (equal passed-tests total-tests))
dotspacemacs//test-dotspacemacs/layers()
funcall(dotspacemacs//test-dotspacemacs/layers)
(and (funcall y) x)
(lambda (x y) (and (funcall y) x))(t dotspacemacs//test-dotspacemacs/layers)
cl-reduce((lambda (x y) (and (funcall y) x)) (dotspacemacs//test-dotspacemacs/layers dotspacemacs//test-dotspacemacs/init) :initial-value t)
(prog1 (cl-reduce (function (lambda (x y) (and (funcall y) x))) (quote (dotspacemacs//test-dotspacemacs/layers dotspacemacs//test-dotspacemacs/init)) :initial-value t) (goto-char (point-min)))
(let (buffer-read-only) (erase-buffer) (insert (format "* Running tests on [[file:%s][%s]] (v%s)\n" dotspacemacs-filepath dotspacemacs-filepath "0.0")) (prog1 (cl-reduce (function (lambda (x y) (and (funcall y) x))) (quote (dotspacemacs//test-dotspacemacs/layers dotspacemacs//test-dotspacemacs/init)) :initial-value t) (goto-char (point-min))))
(save-current-buffer (set-buffer (get-buffer-create dotspacemacs-test-results-buffer)) (if hide-buffer nil (switch-to-buffer-other-window dotspacemacs-test-results-buffer)) (org-mode) (org-indent-mode) (view-mode) (if (and (boundp (quote flyspell-mode)) flyspell-mode) (progn (flyspell-mode -1))) (let (buffer-read-only) (erase-buffer) (insert (format "* Running tests on [[file:%s][%s]] (v%s)\n" dotspacemacs-filepath dotspacemacs-filepath "0.0")) (prog1 (cl-reduce (function (lambda (x y) (and (funcall y) x))) (quote (dotspacemacs//test-dotspacemacs/layers dotspacemacs//test-dotspacemacs/init)) :initial-value t) (goto-char (point-min)))))
(if nil (error (format (concat "error: dotspacemacs/test-dotfile requires " "dotspacemacs-version %s") min-version)) (save-current-buffer (set-buffer (get-buffer-create dotspacemacs-test-results-buffer)) (if hide-buffer nil (switch-to-buffer-other-window dotspacemacs-test-results-buffer)) (org-mode) (org-indent-mode) (view-mode) (if (and (boundp (quote flyspell-mode)) flyspell-mode) (progn (flyspell-mode -1))) (let (buffer-read-only) (erase-buffer) (insert (format "* Running tests on [[file:%s][%s]] (v%s)\n" dotspacemacs-filepath dotspacemacs-filepath "0.0")) (prog1 (cl-reduce (function (lambda (x y) (and ... x))) (quote (dotspacemacs//test-dotspacemacs/layers dotspacemacs//test-dotspacemacs/init)) :initial-value t) (goto-char (point-min))))))
(let ((min-version "0.0")) (if nil (error (format (concat "error: dotspacemacs/test-dotfile requires " "dotspacemacs-version %s") min-version)) (save-current-buffer (set-buffer (get-buffer-create dotspacemacs-test-results-buffer)) (if hide-buffer nil (switch-to-buffer-other-window dotspacemacs-test-results-buffer)) (org-mode) (org-indent-mode) (view-mode) (if (and (boundp (quote flyspell-mode)) flyspell-mode) (progn (flyspell-mode -1))) (let (buffer-read-only) (erase-buffer) (insert (format "* Running tests on [[file:%s][%s]] (v%s)\n" dotspacemacs-filepath dotspacemacs-filepath "0.0")) (prog1 (cl-reduce (function (lambda ... ...)) (quote (dotspacemacs//test-dotspacemacs/layers dotspacemacs//test-dotspacemacs/init)) :initial-value t) (goto-char (point-min)))))))
dotspacemacs/test-dotfile(t)
(or (equal arg (quote (16))) (dotspacemacs/test-dotfile t))
(let ((tests-ok (or (equal arg (quote (16))) (dotspacemacs/test-dotfile t)))) (if tests-ok (progn (load-file buffer-file-name) (progn (if "Calling dotfile init..." (progn (spacemacs-buffer/message "Calling dotfile init..."))) (if (fboundp (quote dotspacemacs/init)) (progn (condition-case err (dotspacemacs/init) (... ... ...))))) (progn (if "Calling dotfile user init..." (progn (spacemacs-buffer/message "Calling dotfile user init..."))) (if (fboundp (quote dotspacemacs/user-init)) (progn (condition-case err (dotspacemacs/user-init) (... ... ...))))) (setq dotspacemacs-editing-style (dotspacemacs//read-editing-style-config dotspacemacs-editing-style)) (configuration-layer/sync) (if (member arg (quote ((4) (16)))) (message (concat "Done (`dotspacemacs/user-config' " "function has been skipped).")) (progn (if "Calling dotfile user config..." (progn (spacemacs-buffer/message "Calling dotfile user config..."))) (if (fboundp (quote dotspacemacs/user-config)) (progn (condition-case err ... ...)))) (run-hooks (quote spacemacs-post-user-config-hook)) (message "Done."))) (switch-to-buffer-other-window dotspacemacs-test-results-buffer) (spacemacs-buffer/warning "Some tests failed, check `%s' buffer" dotspacemacs-test-results-buffer)))
(let ((dotspacemacs-loading-progress-bar nil)) (setq spacemacs-loading-string "") (save-buffer) (let ((tests-ok (or (equal arg (quote (16))) (dotspacemacs/test-dotfile t)))) (if tests-ok (progn (load-file buffer-file-name) (progn (if "Calling dotfile init..." (progn (spacemacs-buffer/message "Calling dotfile init..."))) (if (fboundp (quote dotspacemacs/init)) (progn (condition-case err ... ...)))) (progn (if "Calling dotfile user init..." (progn (spacemacs-buffer/message "Calling dotfile user init..."))) (if (fboundp (quote dotspacemacs/user-init)) (progn (condition-case err ... ...)))) (setq dotspacemacs-editing-style (dotspacemacs//read-editing-style-config dotspacemacs-editing-style)) (configuration-layer/sync) (if (member arg (quote (... ...))) (message (concat "Done (`dotspacemacs/user-config' " "function has been skipped).")) (progn (if "Calling dotfile user config..." (progn ...)) (if (fboundp ...) (progn ...))) (run-hooks (quote spacemacs-post-user-config-hook)) (message "Done."))) (switch-to-buffer-other-window dotspacemacs-test-results-buffer) (spacemacs-buffer/warning "Some tests failed, check `%s' buffer" dotspacemacs-test-results-buffer))))
(save-current-buffer (set-buffer (find-file-noselect dotspacemacs-filepath)) (let ((dotspacemacs-loading-progress-bar nil)) (setq spacemacs-loading-string "") (save-buffer) (let ((tests-ok (or (equal arg (quote ...)) (dotspacemacs/test-dotfile t)))) (if tests-ok (progn (load-file buffer-file-name) (progn (if "Calling dotfile init..." (progn ...)) (if (fboundp ...) (progn ...))) (progn (if "Calling dotfile user init..." (progn ...)) (if (fboundp ...) (progn ...))) (setq dotspacemacs-editing-style (dotspacemacs//read-editing-style-config dotspacemacs-editing-style)) (configuration-layer/sync) (if (member arg (quote ...)) (message (concat "Done (`dotspacemacs/user-config' " "function has been skipped).")) (progn (if "Calling dotfile user config..." ...) (if ... ...)) (run-hooks (quote spacemacs-post-user-config-hook)) (message "Done."))) (switch-to-buffer-other-window dotspacemacs-test-results-buffer) (spacemacs-buffer/warning "Some tests failed, check `%s' buffer" dotspacemacs-test-results-buffer)))))
(progn (save-current-buffer (set-buffer (find-file-noselect dotspacemacs-filepath)) (let ((dotspacemacs-loading-progress-bar nil)) (setq spacemacs-loading-string "") (save-buffer) (let ((tests-ok (or (equal arg ...) (dotspacemacs/test-dotfile t)))) (if tests-ok (progn (load-file buffer-file-name) (progn (if "Calling dotfile init..." ...) (if ... ...)) (progn (if "Calling dotfile user init..." ...) (if ... ...)) (setq dotspacemacs-editing-style (dotspacemacs//read-editing-style-config dotspacemacs-editing-style)) (configuration-layer/sync) (if (member arg ...) (message ...) (progn ... ...) (run-hooks ...) (message "Done."))) (switch-to-buffer-other-window dotspacemacs-test-results-buffer) (spacemacs-buffer/warning "Some tests failed, check `%s' buffer" dotspacemacs-test-results-buffer))))))
(if (file-exists-p dotspacemacs-filepath) (progn (save-current-buffer (set-buffer (find-file-noselect dotspacemacs-filepath)) (let ((dotspacemacs-loading-progress-bar nil)) (setq spacemacs-loading-string "") (save-buffer) (let ((tests-ok (or ... ...))) (if tests-ok (progn (load-file buffer-file-name) (progn ... ...) (progn ... ...) (setq dotspacemacs-editing-style ...) (configuration-layer/sync) (if ... ... ... ... ...)) (switch-to-buffer-other-window dotspacemacs-test-results-buffer) (spacemacs-buffer/warning "Some tests failed, check `%s' buffer" dotspacemacs-test-results-buffer)))))))
dotspacemacs/sync-configuration-layers(nil)
funcall-interactively(dotspacemacs/sync-configuration-layers nil)
call-interactively(dotspacemacs/sync-configuration-layers nil nil)
command-execute(dotspacemacs/sync-configuration-layers)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment