emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Orgmode] BUG: Marking repeating tasks done


From: Bernt Hansen
Subject: [Orgmode] BUG: Marking repeating tasks done
Date: Mon, 03 Nov 2008 08:54:46 -0500
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.2 (gnu/linux)

Hi Carsten,

I updated org-mode this morning to

   commit 413d9b73b0a5a4c38be8791d72e17137306c59ac

and I'm trying to mark tasks with repeaters done and get the following
error.


,----[ test.org ]
| #+STARTUP:
| * TODO Repeating Task
|   SCHEDULED: <2008-11-01 Sat +1w>
|  
|   Do something
| 
`----

In the repeating task do C-c C-t d to mark the task as done.  This would
normally prompt for a note but it fails with an error.

This leaves the task like this:

,----[ test.org ]
| #+STARTUP:
| * DONE Repeating Task
|   SCHEDULED: <2008-11-01 Sat +1w>
|   - State "DONE"       [2008-11-03 Mon 08:46]
|  
|   Do something
| 
`----

Org-mode version 6.10c
GNU Emacs 22.2.1 (i486-pc-linux-gnu, X toolkit, Xaw3d scroll bars) of
2008-07-24 on raven, modified by Debian


I have the following custom settings:

,----[ Part of my custom settings ]
|  '(org-use-fast-todo-selection t)
|  '(org-todo-keywords (quote ((sequence "TODO(t)" "|" "DONE(d!/!)") (sequence 
"WAITING(w@/!)" "ONGOING(o)" "DEFERRED(D@/!)" "|" "CANCELLED(c@/!)") (sequence 
"QUOTATION(q!)" "QUOTED(Q!)" "|" "APPROVED(A@)" "EXPIRED(E@)" "REJECTED(R@)") 
(sequence "OPEN(O!)" "|" "CLOSED(C@)") (sequence "PROJECT(P)" "|" 
"COMPLETE(p@)") (sequence "|" "NOTE" "PHONE" "MEETING"))))
|  '(org-log-done (quote time))
`----

,----
| Debugger entered--Lisp error: (void-variable 
org-agenda-headline-snapshot-before-repeat)
|   (boundp org-agenda-headline-snapshot-before-repeat)
|   (if (boundp org-agenda-headline-snapshot-before-repeat) (progn 
(save-match-data ...)))
|   (when (boundp org-agenda-headline-snapshot-before-repeat) (save-match-data 
(setq org-agenda-headline-snapshot-before-repeat ...)))
|   (progn (when (boundp org-agenda-headline-snapshot-before-repeat) 
(save-match-data ...)) (org-auto-repeat-maybe state))
|   (if now-done-p (progn (when ... ...) (org-auto-repeat-maybe state)))
|   (when now-done-p (when (boundp org-agenda-headline-snapshot-before-repeat) 
(save-match-data ...)) (org-auto-repeat-maybe state))
|   (let* ((match-data ...) (startpos ...) (logging ...) (org-log-done 
org-log-done) (org-log-repeat org-log-repeat) (org-todo-log-states 
org-todo-log-states) (this ...) (hl-pos ...) (head ...) (ass ...) (interpret 
...) (done-word ...) (final-done-word ...) (last-state ...) 
(completion-ignore-case t) (member ...) (tail ...) (state ...) (next ...) 
(change-plist ...) dolog now-done-p) (when org-blocker-hook (unless ... ...)) 
(store-match-data match-data) (replace-match next t t) (unless 
(pos-visible-in-window-p hl-pos) (message "TODO state changed to %s" ...)) 
(unless head (setq head ... ass ... interpret ... 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 ...) (when 
... ...) (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-maybe 
state)) (if (and ... ... ... ...) (progn ... ...)) (when org-trigger-hook 
(save-excursion ...)))
|   (catch (quote exit) (org-back-to-heading) (if (looking-at outline-regexp) 
(goto-char ...)) (or (looking-at ...) (looking-at " *")) (let* (... ... ... ... 
... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... dolog 
now-done-p) (when org-blocker-hook ...) (store-match-data match-data) 
(replace-match next t t) (unless ... ...) (unless head ...) (when ... ...) 
(setq org-last-todo-state-is-todo ...) (setq now-done-p ...) (and logging ...) 
(when ... ... ... ... ...) (org-todo-trigger-tag-changes state) (and 
org-auto-align-tags ... ...) (when org-provide-todo-statistics ...) (run-hooks 
...) (if ... ...) (put-text-property ... ... ... head) (when now-done-p ... 
...) (if ... ...) (when org-trigger-hook ...)))
|   (save-excursion (catch (quote exit) (org-back-to-heading) (if ... ...) (or 
... ...) (let* ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... 
... ... ... ...)))
|   org-todo(nil)
|   call-interactively(org-todo)
`----

Rewinding to 

commit cb1bbaf244e141630f29cd117e30cc91741ac3bc
Author: Carsten Dominik <address@hidden>
Date:   Sun Nov 2 17:13:25 2008 +0100

    Don't keep buffers visited during index publishing.

works.

Regards,
Bernt






reply via email to

[Prev in Thread] Current Thread [Next in Thread]