Created
November 1, 2016 22:16
-
-
Save hackervera/de9b886eb16466965b6f69227a57ecea to your computer and use it in GitHub Desktop.
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
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