From mboxrd@z Thu Jan 1 00:00:00 1970 From: Stelian Iancu Subject: Bug: wrong-type-argument when changing TODO state [7.7] Date: Sun, 28 Aug 2011 07:24:06 -0400 Message-ID: <4E5A2556.50106@gmail.com> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="------------080308050905050602090208" Return-path: Received: from eggs.gnu.org ([140.186.70.92]:37767) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QxdbS-00022L-90 for emacs-orgmode@gnu.org; Sun, 28 Aug 2011 07:32:39 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1QxdbQ-0001IT-R1 for emacs-orgmode@gnu.org; Sun, 28 Aug 2011 07:32:38 -0400 Received: from mail-fx0-f41.google.com ([209.85.161.41]:53628) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QxdbQ-0001IP-I6 for emacs-orgmode@gnu.org; Sun, 28 Aug 2011 07:32:36 -0400 Received: by fxg9 with SMTP id 9so4284932fxg.0 for ; Sun, 28 Aug 2011 04:32:35 -0700 (PDT) List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org This is a multi-part message in MIME format. --------------080308050905050602090208 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit 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. ------------------------------------------------------------------------ I am trying to switch between TODO and DONE states with Shift-Right Arrow and I get a (wrong-type-argument stringp nil) error. Please find attached the backtrace. Emacs : GNU Emacs 23.2.1 (i486-pc-linux-gnu, GTK+ Version 2.20.0) of 2010-12-11 on raven, modified by Debian Package: Org-mode version 7.7 current state: ============== (setq org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-vars) org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook) org-agenda-custom-commands '(("d" todo #("DELEGATED" 0 9 (face org-warning)) nil) ("c" todo #("DONE|DEFERRED|CANCELLED" 0 23 (face org-warning)) nil) ("w" todo #("WAITING" 0 7 (face org-warning)) nil) ("W" agenda "" ((org-agenda-ndays 21))) ("A" agenda "" ((org-agenda-skip-function (lambda nil (org-agenda-skip-entry-if (quote notregexp) "\\=.*\\[#A\\]")) ) (org-agenda-ndays 1) (org-agenda-overriding-header "Today's Priority #A tasks: ")) ) ("u" alltodo "" ((org-agenda-skip-function (lambda nil (org-agenda-skip-entry-if (quote scheduled) (quote deadline) (quote regexp) "<[^>\n]+>") ) ) (org-agenda-overriding-header "Unscheduled TODO entries: ")) ) ) org-agenda-files '("~/Docs/org/todo.org") org-metaup-hook '(org-babel-load-in-session-maybe) org-after-todo-state-change-hook '(org-clock-out-if-current) org-export-blocks-postblock-hook '(org-exp-res/src-name-cleanup) org-export-latex-format-toc-function 'org-export-latex-format-toc-default org-agenda-skip-scheduled-if-done t org-tab-first-hook '(org-hide-block-toggle-maybe org-src-native-tab-command-maybe org-babel-hide-result-toggle-maybe) org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer) org-confirm-shell-link-function 'yes-or-no-p org-export-first-hook '(org-beamer-initialize-open-trackers) org-startup-indented 1 org-agenda-before-write-hook '(org-agenda-add-entry-text) org-default-notes-file "~/Docs/org/notes.org" org-blank-before-new-entry nil org-babel-pre-tangle-hook '(save-buffer) 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-preprocess-before-normalizing-links-hook '(org-remove-file-link-modifiers) org-mode-hook '((lambda nil (org-add-hook (quote change-major-mode-hook) (quote org-show-block-all) (quote append) (quote local)) ) (lambda nil (org-add-hook (quote change-major-mode-hook) (quote org-babel-show-result-all) (quote append) (quote local)) ) org-babel-result-hide-spec org-babel-hide-all-hashes) org-agenda-ndays 7 org-refile-targets '((org-agenda-files :maxlevel . 5)) org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point org-babel-execute-safely-maybe) org-cycle-separator-lines 1 org-confirm-elisp-link-function 'yes-or-no-p org-fast-tag-selection-single-key 'expert org-agenda-start-on-weekday nil org-export-interblocks '((lob org-babel-exp-lob-one-liners) (src org-babel-exp-inline-src-blocks)) org-clock-out-hook '(org-clock-remove-empty-clock-drawer) org-agenda-skip-deadline-if-done t org-reverse-note-order t org-occur-hook '(org-first-headline-recenter) org-from-is-user-regexp "\\" org-export-preprocess-before-selecting-backend-code-hook '(org-beamer-select-beamer-code) org-tags-column 120 org-remember-templates '(("Journal" 106 "* %U %? %^g\n\n %x" "~/Dropbox/org/journal.org" (quote top)) ) 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-metadown-hook '(org-babel-pop-to-session-maybe) org-export-blocks '((src org-babel-exp-src-block nil) (comment org-export-blocks-format-comment t) (ditaa org-export-blocks-format-ditaa nil) (dot org-export-blocks-format-dot nil)) ) --------------080308050905050602090208 Content-Type: text/plain; name="backtrace.txt" Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename="backtrace.txt" Debugger entered--Lisp error: (wrong-type-argument stringp nil) looking-at(nil) (save-excursion (beginning-of-line 1) (looking-at org-todo-line-regexp)= ) (and (outline-on-heading-p) (not (bolp)) (save-excursion (beginning-of-= line 1) (looking-at org-todo-line-regexp)) (< (point) (+ 2 ...))) (if (and (outline-on-heading-p) (not ...) (save-excursion ... ...) (< .= =2E. ...)) (progn (goto-char ...) (and ... ...))) (let* ((match-data ...) (startpos ...) (logging ...) (org-log-done org-= log-done) (org-log-repeat org-log-repeat) (org-todo-log-states org-todo-l= og-states) (this ...) (hl-pos ...) (head ...) (ass ...) (interpret ...) (= done-word ...) (final-done-word ...) (last-state ...) (completion-ignore-= case t) (member ...) (tail ...) (state ...) (state ...) (next ...) (chang= e-plist ...) dolog now-done-p) (when org-blocker-hook (setq org-last-todo= -state-is-todo ...) (unless ... ...)) (store-match-data match-data) (repl= ace-match next t t) (unless (pos-visible-in-window-p hl-pos) (message "TO= DO state changed to %s" ...)) (unless head (setq head ... ass ... interpr= et ... done-word ... final-done-word ...)) (when (memq arg ...) (message = "Keyword-Set %d/%d: %s" ... ... ...)) (setq org-last-todo-state-is-todo (= not ...)) (setq now-done-p (and ... ...)) (and logging (org-local-logging= logging)) (when (and ... ... ...) (setq dolog ...) (if ... ...) (when ..= =2E ...) (when ... ... ...) (when ... ...)) (org-todo-trigger-tag-changes= state) (and org-auto-align-tags (not org-setting-tags) (org-set-tags nil= t)) (when org-provide-todo-statistics (org-update-parent-todo-statistics= )) (run-hooks (quote org-after-todo-state-change-hook)) (if (and arg ...)= (setq head ...)) (put-text-property (point-at-bol) (point-at-eol) (quote= org-todo-head) head) (when now-done-p (when ... ...) (org-auto-repeat-ma= ybe state)) (if (and ... ... ... ...) (progn ... ...)) (when org-trigger-= hook (save-excursion ...))) (catch (quote exit) (org-back-to-heading t) (if (looking-at org-outline= -regexp) (goto-char ...)) (or (looking-at ...) (looking-at " *")) (let* (= =2E.. ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...= ... ... ... dolog now-done-p) (when org-blocker-hook ... ...) (store-mat= ch-data match-data) (replace-match next t t) (unless ... ...) (unless hea= d ...) (when ... ...) (setq org-last-todo-state-is-todo ...) (setq now-do= ne-p ...) (and logging ...) (when ... ... ... ... ... ...) (org-todo-trig= ger-tag-changes state) (and org-auto-align-tags ... ...) (when org-provid= e-todo-statistics ...) (run-hooks ...) (if ... ...) (put-text-property ..= =2E ... ... head) (when now-done-p ... ...) (if ... ...) (when org-trigge= r-hook ...))) (save-excursion (catch (quote exit) (org-back-to-heading t) (if ... ...= ) (or ... ...) (let* ... ... ... ... ... ... ... ... ... ... ... ... ... = =2E.. ... ... ... ... ... ...))) (let ((org-blocker-hook org-blocker-hook) (case-fold-search nil)) (when= (equal arg ...) (setq arg nil org-blocker-hook nil)) (when (and org-bloc= ker-hook ...) (setq org-blocker-hook nil)) (save-excursion (catch ... ...= ... ... ...))) org-todo(right) call-interactively(org-todo) (let ((current-prefix-arg arg)) (call-interactively command)) org-call-with-arg(org-todo right) (let ((org-inhibit-logging ...) (org-inhibit-blocking ...)) (org-call-w= ith-arg (quote org-todo) (quote right))) (cond ((run-hook-with-args-until-success ...)) ((and org-support-shift-= select ...) (org-call-for-shift-select ...)) ((org-at-timestamp-p t) (cal= l-interactively ...)) ((and ... ...) (let ... ...)) ((or ... ...) (org-ca= ll-with-arg ... nil)) ((and ... ...) (call-interactively ...)) ((org-cloc= ktable-try-shift ... arg)) ((run-hook-with-args-until-success ...)) (org-= support-shift-select (org-call-for-shift-select ...)) (t (org-shiftselect= -error))) org-shiftright(nil) call-interactively(org-shiftright nil nil) --------------080308050905050602090208--