Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Wrong type argument: listp, org-level-1 on dotspacemacs/sync-configuration-layer #4834

Closed
noonie2k opened this issue Jan 27, 2016 · 10 comments
Closed

Comments

@noonie2k
Copy link

I've recently been trying spacemacs since I love Emacs and have spent my last several years in Vim.

I don't think this was happening until recently but I have recently started to get an error pop up when I try to re-evaluate my .spacemacs file using SPC f e R.

The first time i run this in a session all is fine, the second time I receive the error in the title.
Also this only occurs if I have the org layer enabled in my .spacemacs file.

If I remove the layer (comment out the line), restart emacs to remove the now orphaned packages and run SPC f e R it will run without error. But add org mode, run the command (which downloads the packages) and run it again I get the error.

I've included the stack dump (from debug-on-error) below.
Thanks,
Adam

Debugger entered--Lisp error: (wrong-type-argument listp org-level-1)
  org-activate-plain-links(2383)
  font-lock-fontify-keywords-region(1 2383 nil)
  font-lock-default-fontify-region(1 2383 nil)
  font-lock-fontify-region(1 2383 nil)
  byte-code("\212\303 �\304\216\305ed   #\210\306 \210\307\211�+\207" [save-match-data-internal verbose font-lock-fontified match-data ((byte-code "\301�\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) font-lock-fontify-region font-lock-after-fontify-buffer t] 4)
  font-lock-default-fontify-buffer()
  font-lock-fontify-buffer()
  org-bullets-mode()
  run-hooks(change-major-mode-after-body-hook text-mode-hook outline-mode-hook org-mode-hook)
  apply(run-hooks (change-major-mode-after-body-hook text-mode-hook outline-mode-hook org-mode-hook))
  run-mode-hooks(org-mode-hook)
  org-mode()
  (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) (... ... ...))))) (configuration-layer/sync) (if (member arg (quote ((4) (16)))) (message (concat "Done (`dotspacemacs/user-config' function has " "been skipped).")) (if (fboundp (quote dotspacemacs/user-config)) (progn (if "Calling dotfile user config..." (progn ...)) (if (fboundp ...) (progn ...))) (spacemacs-buffer/warning (concat "`dotspacemacs/config' is deprecated, " "please rename your function to " "`dotspacemacs/user-config'")) (progn (if "Calling dotfile user config..." (progn ...)) (if (fboundp ...) (progn ...)))) (message "Done.")) (if (configuration-layer/package-usedp (quote spaceline)) (progn (spacemacs//restore-powerline (current-buffer))))) (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 ... ...)))) (configuration-layer/sync) (if (member arg (quote (... ...))) (message (concat "Done (`dotspacemacs/user-config' function has " "been skipped).")) (if (fboundp (quote dotspacemacs/user-config)) (progn (if "Calling dotfile user config..." ...) (if ... ...)) (spacemacs-buffer/warning (concat "`dotspacemacs/config' is deprecated, " "please rename your function to " "`dotspacemacs/user-config'")) (progn (if "Calling dotfile user config..." ...) (if ... ...))) (message "Done.")) (if (configuration-layer/package-usedp (quote spaceline)) (progn (spacemacs//restore-powerline (current-buffer))))) (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 ...))) (configuration-layer/sync) (if (member arg (quote ...)) (message (concat "Done (`dotspacemacs/user-config' function has " "been skipped).")) (if (fboundp ...) (progn ... ...) (spacemacs-buffer/warning ...) (progn ... ...)) (message "Done.")) (if (configuration-layer/package-usedp (quote spaceline)) (progn (spacemacs//restore-powerline ...)))) (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 ... ...)) (configuration-layer/sync) (if (member arg ...) (message ...) (if ... ... ... ...) (message "Done.")) (if (configuration-layer/package-usedp ...) (progn ...))) (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 ... ...) (configuration-layer/sync) (if ... ... ... ...) (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)
  call-interactively(dotspacemacs/sync-configuration-layers nil nil)
  command-execute(dotspacemacs/sync-configuration-layers)

Emacs Version: emacs-24.5.1
Spacemacs Version: spacemacs-0.105.9
Org Version: Org-mode version 8.3.3 (8.3.3-26-ge92a06-elpa @ /home/adam/.emacs.d/elpa/org-20160125/)

@Andre0991
Copy link
Contributor

Probably related to #4793 .

Does org-reload fix it?

Can you paste the output of spacemacs/describe-system-info (SPC h d s) please?

org is kind of broken now :(

@robbyoconnor
Copy link
Contributor

Show me SPC hds it shows more information.

@robbyoconnor
Copy link
Contributor

Follow this template.

@robbyoconnor
Copy link
Contributor

Also, I have had this happen, and restarting emacs fixes it

@noonie2k
Copy link
Author

Sorry, new to this repo and missed the bug reporting guidelines!

org-reload runs fine but SPC f e R still throws the error.

Description

Enabling the org layer results in an error "Wrong type argument: listp, org-level-1" when running - dotspacemacs/sync-configuration-layer (SPC f e R)

Reproduction guide

  • Start Emacs
  • Enable the "org" layer in .spacemacs
  • Run SPC f e R
  • Org Mode is installed
  • Make further changes to .spacemacs
  • Run SPC f e R

DESCRIPTION OF THE OBSERVED BEHAVIOUR

  • Error in description is shown and the changes are NOT applied
  • From this point the first run of SPC f e R after a restart of Emacs is fine, subsequent ones always fail with the above error

DESCRIPTION OF THE EXPECTED BEHAVIOUR

  • Changes to .spacemacs should be applied without having to restart emacs every time

System Info

  • OS: gnu/linux
  • Emacs: 24.5.1
  • Spacemacs: 0.105.9
  • Spacemacs branch: master (rev. 0562f05)
  • Distribution: spacemacs
  • Editing style: vim
  • Completion: helm
  • Layers:
(emacs-lisp org)

Backtrace

Debugger entered--Lisp error: (wrong-type-argument listp org-level-1)
  org-activate-plain-links(2383)
  font-lock-fontify-keywords-region(1 2383 nil)
  font-lock-default-fontify-region(1 2383 nil)
  font-lock-fontify-region(1 2383 nil)
  byte-code("\212\303 �\304\216\305ed   #\210\306 \210\307\211�+\207" [save-match-data-internal verbose font-lock-fontified match-data ((byte-code "\301�\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) font-lock-fontify-region font-lock-after-fontify-buffer t] 4)
  font-lock-default-fontify-buffer()
  font-lock-fontify-buffer()
  org-bullets-mode()
  run-hooks(change-major-mode-after-body-hook text-mode-hook outline-mode-hook org-mode-hook)
  apply(run-hooks (change-major-mode-after-body-hook text-mode-hook outline-mode-hook org-mode-hook))
  run-mode-hooks(org-mode-hook)
  org-mode()
  (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) (... ... ...))))) (configuration-layer/sync) (if (member arg (quote ((4) (16)))) (message (concat "Done (`dotspacemacs/user-config' function has " "been skipped).")) (if (fboundp (quote dotspacemacs/user-config)) (progn (if "Calling dotfile user config..." (progn ...)) (if (fboundp ...) (progn ...))) (spacemacs-buffer/warning (concat "`dotspacemacs/config' is deprecated, " "please rename your function to " "`dotspacemacs/user-config'")) (progn (if "Calling dotfile user config..." (progn ...)) (if (fboundp ...) (progn ...)))) (message "Done.")) (if (configuration-layer/package-usedp (quote spaceline)) (progn (spacemacs//restore-powerline (current-buffer))))) (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 ... ...)))) (configuration-layer/sync) (if (member arg (quote (... ...))) (message (concat "Done (`dotspacemacs/user-config' function has " "been skipped).")) (if (fboundp (quote dotspacemacs/user-config)) (progn (if "Calling dotfile user config..." ...) (if ... ...)) (spacemacs-buffer/warning (concat "`dotspacemacs/config' is deprecated, " "please rename your function to " "`dotspacemacs/user-config'")) (progn (if "Calling dotfile user config..." ...) (if ... ...))) (message "Done.")) (if (configuration-layer/package-usedp (quote spaceline)) (progn (spacemacs//restore-powerline (current-buffer))))) (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 ...))) (configuration-layer/sync) (if (member arg (quote ...)) (message (concat "Done (`dotspacemacs/user-config' function has " "been skipped).")) (if (fboundp ...) (progn ... ...) (spacemacs-buffer/warning ...) (progn ... ...)) (message "Done.")) (if (configuration-layer/package-usedp (quote spaceline)) (progn (spacemacs//restore-powerline ...)))) (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 ... ...)) (configuration-layer/sync) (if (member arg ...) (message ...) (if ... ... ... ...) (message "Done.")) (if (configuration-layer/package-usedp ...) (progn ...))) (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 ... ...) (configuration-layer/sync) (if ... ... ... ...) (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)
  call-interactively(dotspacemacs/sync-configuration-layers nil nil)
  command-execute(dotspacemacs/sync-configuration-layers)

@Andre0991
Copy link
Contributor

This is probably a high priority issue. Lots of users are reporting issues with org on the chat. I myself had to rollback the updates.

@robbyoconnor
Copy link
Contributor

@noonie2k this will be a non-issue since with the introduction of SPC h I which allows you to open an issue with all details filled out!

@Andre0991
Copy link
Contributor

@noonie2k Have you tried org-reload?

@TheBB
Copy link
Contributor

TheBB commented Jan 27, 2016

This looks like it's exactly the same problem as #4793. We can continue there. I'll change the title of that issue to something more general.

@TheBB TheBB closed this as completed Jan 27, 2016
@noonie2k
Copy link
Author

Just as a followup; I manually downloaded org-20160118 to my ~/.emacs.d/elpa directory and deleted the org-20160125 folder that was there... things seem to be better now (insofar as I don't see this error when i run "SPC f e R" now).

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Projects
None yet
Development

No branches or pull requests

4 participants