Bug: Lisp error: (wrong-type-argument listp t) at startup [7.9.3f (release_7.9.3f-10-g2b13d0 @ /home/horn/Repos/el/org-mode/lisp/)]

[Tassilo Horn <tsdh@gnu.org>]

Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.  You don't know how to make a good report?  See

     http://orgmode.org/manual/Feedback.html#Feedback

Your bug report will be posted to the Org-mode mailing list.
------------------------------------------------------------------------

Hi all,

since I've updated my org git clone today, I get the following error on
emacs startup.

--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (wrong-type-argument listp t)
  delq(nil t)
  org-show-context(bookmark-jump)
  org-bookmark-jump-unhide()
  ad-Advice-save-place-find-file-hook(#[nil "\b\204\a.\306 \210\307	\n\"\211.\205..\f\204..\vAb\210\310\211.)\207" [save-place-loaded buffer-file-name save-place-alist cell revert-buffer-in-progress-p save-place load-save-place-alist-from-file assoc t] 4])
  apply(ad-Advice-save-place-find-file-hook #[nil "\b\204\a.\306 \210\307	\n\"\211.\205..\f\204..\vAb\210\310\211.)\207" [save-place-loaded buffer-file-name save-place-alist cell revert-buffer-in-progress-p save-place load-save-place-alist-from-file assoc t] 4] nil)
  save-place-find-file-hook()
  run-hooks(find-file-hook)
  after-find-file(nil t)
  find-file-noselect-1(#<buffer contacts.org> "~/Repos/org/contacts.org" nil nil "~/Repos/org/contacts.org" (9437614 2051))
  find-file-noselect("/home/horn/Repos/org/contacts.org")
  org-get-agenda-file-buffer("/home/horn/Repos/org/contacts.org")
  byte-code("\306\b!\203\f.\bq\210\202..\307\b!\210\310\b!q\210~\210\311 \210\312	\313\"\210\312\314\315\"\210\316\n\v\".\316\f.\".\316....\"..\316....\"..\316.\x1f. \".\x1f\317 .!\320\211.\".#\320.$\321\211.%.&\321.'\322\216\212\323ed.(#\210.)\203\212.eb\210\324.*\321\320#\203\212.\325\320!\203n.\326\327 \330\320!.+#\210\202n.eb\210\331.,.-\"..\324..\321\320#\203\253.\326\332\224\330\320!./#\210\202\225..	\321\207" [file org-effort-property org-todo-keywords-for-agenda org-todo-keywords-1 org-done-keywords-for-agenda org-done-keywords bufferp org-check-agenda-file org-get-agenda-file-buffer org-refresh-category-properties org-refresh-properties org-effort "APPT_WARNTIME" org-appt-warntime append buffer-modified-p t nil ((byte-code "\b\204\b.\301\302!\210\302\207" [modified restore-buffer-modified-p nil] 2)) remove-text-properties re-search-forward org-at-heading-p add-text-properties point-at-bol org-end-of-subtree format 0 org-todo-keyword-alist-for-agenda org-todo-key-alist org-drawers-for-agenda org-drawers org-tag-alist-for-agenda org-tag-alist modified buffer-undo-list inhibit-read-only inhibit-modification-hooks deactivate-mark buffer-file-name buffer-file-truename pall org-agenda-skip-archived-trees rea pa org-heading-keyword-regexp-format org-comment-string re pc] 5)
  org-agenda-prepare-buffers(("/home/horn/Repos/org/contacts.org" "/home/horn/Repos/org/diss.org" "/home/horn/Repos/org/from-org-mobile.org" "/home/horn/Repos/org/gnu.org" "/home/horn/Repos/org/hints.org" "/home/horn/Repos/org/private.org" "/home/horn/Repos/org/remember.org" "/home/horn/Repos/org/uni.org"))
  org-agenda-to-appt(t)
  th-org-agenda-to-appt()
  eval-buffer(#<buffer  *load*> nil "/home/horn/.emacs" nil t)  ; Reading at buffer position 46461
  load-with-code-conversion("/home/horn/.emacs" "/home/horn/.emacs" t t)
  load("~/.emacs" t t)
  #[0 "\b\205\262.	\306=\203..\307\b\310Q\202;.	\311=\204..\307\b\312Q\202;.\313\307\314\315#\203*.\316\202;.\313\307\314\317#\203:.\320\nB.\321\202;.\316\322.\323.\322\211#\210\v\322=\203a.\324\325\326\307\b\327Q!\"\323.\322\211#\210\v\322=\203`...\210\v\203\243.\330\v!\331\232\203\243.\332\v!\211\333P\334.!\203}.\211\202\210.\334.!\203\207..\202\210.\314\262..\203\241.\335.\v\"\203\237.\336\337.\v#\210\340\341!\210..\266.\f?\205\260.\314.\323\342\322\211#)\262.\207" [init-file-user system-type delayed-warnings-list user-init-file inhibit-default-init inhibit-startup-screen ms-dos "~" "/_emacs" windows-nt "/.emacs" directory-files nil "^\\.emacs\\(\\.elc?\\)?$" "~/.emacs" "^_emacs\\(\\.elc?\\)?$" (initialization "`_emacs' init file is deprecated, please use `.emacs'") "~/_emacs" t load expand-file-name "init" file-name-as-directory "/.emacs.d" file-name-extension "elc" file-name-sans-extension ".el" file-exists-p file-newer-than-file-p message "Warning: %s is newer than %s" sit-for 1 "default"] 7 "\n\n(fn)"]()
  command-line()
  normal-top-level()
--8<---------------cut here---------------end--------------->8---

I've done a bisection, and the commit introducing this problem is this:

--8<---------------cut here---------------start------------->8---
41882a99d3cf14e4c9ad45559bc3fc9e8b21b581 is the first bad commit
commit 41882a99d3cf14e4c9ad45559bc3fc9e8b21b581
Author: Bastien Guerry <bzg@altern.org>
Date:   Tue Feb 26 22:45:04 2013 +0100

    Fix a longstanding issue with ellispsis on top of the window
    
    * org.el (org-show-context): Remove useless catch.  Make sure the
    top of the window is a visible headline.
    * org.el (org-activate-plain-links): Remove unused catch.
    
    * org-macs.el (org-get-alist-option): Return nil, not (nil), so
    that `org-show-context' DTRT.
    
    Thanks to Samuel Wales for his patience in reporting this.

:040000 040000 a983ad4c9bf688405e01e51f6e8c1c54c037b599 efd7e08287b34f16a5623d0ae5d881ad85ff9b60 M	lisp
--8<---------------cut here---------------end--------------->8---

Bye,
Tassilo

Emacs  : GNU Emacs 24.3.50.1 (x86_64-pc-linux-gnu, GTK+ Version 3.6.3)
 of 2013-02-26 on thinkpad
Package: Org-mode version 7.9.3f (release_7.9.3f-10-g2b13d0 @ /home/horn/Repos/el/org-mode/lisp/)

current state:
==============
(setq
 org-export-preprocess-before-selecting-backend-code-hook '(org-beamer-select-beamer-code)
 org-tab-first-hook '(org-hide-block-toggle-maybe org-src-native-tab-command-maybe
		      org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
 outline-minor-mode-hook '(th-outline-minor-mode-init)
 org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook)
 org-gnus-prefer-web-links t
 org-special-ctrl-k t
 org-occur-hook '(org-first-headline-recenter)
 org-src-tab-acts-natively t
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-export-preprocess-before-normalizing-links-hook '(org-remove-file-link-modifiers)
 org-log-done 'time
 org-confirm-shell-link-function 'yes-or-no-p
 org-complete-tags-always-offer-all-agenda-tags t
 org-id-link-to-org-use-id t
 org-columns-default-format "%50ITEM %TODO %ALLTAGS %SCHEDULED %DEADLINE"
 org-export-latex-final-hook '(org-beamer-amend-header org-beamer-fix-toc
			       org-beamer-auto-fragile-frames
			       org-beamer-place-default-actions-for-lists)
 org-agenda-inhibit-startup nil
 org-agenda-restore-windows-after-quit t
 org-special-ctrl-a/e 'reversed
 org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-vars)
 org-agenda-custom-commands '(("n" "Next 21 days" agenda "" ((org-agenda-span 21)))
			      ("^" "Calfw Month Calendar" th-calfw-open-calendar))
 org-return-follows-link t
 org-agenda-time-leading-zero t
 org-capture-templates '(("n" "NORMAL" entry (file "/home/horn/Repos/org/remember.org")
			  "* %?\n  :PROPERTIES:\n  :created: %U\n  :link: %a\n  :END:\n	%i")
			 ("t" "TODO" entry (file "/home/horn/Repos/org/remember.org")
			  "* TODO %?\n  :PROPERTIES:\n  :created: %U\n  :link: %a\n  :END:\n  %i")
			 ("i" "IDEA" entry (file "/home/horn/Repos/org/remember.org")
			  "* IDEA %?\n  :PROPERTIES:\n  :created: %U\n  :link: %a\n  :END:\n  %i")
			 )
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-mode-hook '(th-org-mode-init
		 #[nil "\300\301\302\303\304$\207"
		   [org-add-hook change-major-mode-hook org-show-block-all append local] 5]
		 #[nil "\300\301\302\303\304$\207"
		   [org-add-hook change-major-mode-hook org-babel-show-result-all append local] 5]
		 org-babel-result-hide-spec org-babel-hide-all-hashes)
 org-refile-targets '((org-agenda-files :maxlevel . 5))
 org-attach-method 'mv
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point org-babel-execute-safely-maybe)
 org-refile-use-outline-path 'file
 org-directory "/home/horn/Repos/org"
 org-enforce-todo-dependencies t
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-lines
		  org-optimize-window-after-visibility-change)
 org-export-latex-format-toc-function 'org-export-latex-format-toc-default
 org-export-blocks '((src org-babel-exp-src-block nil)
		     (export-comment org-export-blocks-format-comment t)
		     (ditaa org-export-blocks-format-ditaa nil)
		     (dot org-export-blocks-format-dot nil))
 org-export-first-hook '(org-beamer-initialize-open-trackers)
 org-attach-directory "/home/horn/Repos/org/attachments"
 org-archive-default-command 'org-archive-set-tag
 org-export-interblocks '((src org-babel-exp-non-block-elements))
 org-refile-allow-creating-parent-nodes 'confirm
 org-todo-keywords '((sequence "TODO(t)" "STARTED(s)" "DELEGATED(g)" "IDEA(i)" "|" "DONE(d)"
		      "CANCELLED(c)")
		     )
 org-modules '(org-icalendar org-attach org-protocol org-id org-bibtex org-docview org-gnus org-info
	       org-irc org-capture org-mobile)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-log-into-drawer "LOGBOOK"
 org-icalendar-store-UID t
 org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
 org-mobile-directory "~/Dropbox/MobileOrg"
 org-agenda-mode-hook '(th-org-agenda-mode-init)
 org-agenda-files '("/home/horn/Repos/org")
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-link-frame-setup '((vm . vm-visit-folder) (gnus . org-gnus-no-new-news)
			(file . find-file-other-window))
 org-mobile-inbox-for-pull "~/Repos/org/from-org-mobile.org"
 org-src-fontify-natively t
 )