emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* BUG: Marking repeating tasks done
@ 2008-11-03 13:54 Bernt Hansen
  2008-11-03 20:39 ` Carsten Dominik
  0 siblings, 1 reply; 3+ messages in thread
From: Bernt Hansen @ 2008-11-03 13:54 UTC (permalink / raw)
  To: emacs-orgmode

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 <carsten.dominik@gmail.com>
Date:   Sun Nov 2 17:13:25 2008 +0100

    Don't keep buffers visited during index publishing.

works.

Regards,
Bernt

^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: BUG: Marking repeating tasks done
  2008-11-03 13:54 BUG: Marking repeating tasks done Bernt Hansen
@ 2008-11-03 20:39 ` Carsten Dominik
  2008-11-03 22:33   ` Bernt Hansen
  0 siblings, 1 reply; 3+ messages in thread
From: Carsten Dominik @ 2008-11-03 20:39 UTC (permalink / raw)
  To: Bernt Hansen; +Cc: emacs-orgmode

Fixed, thanks.

- Carsten

On Nov 3, 2008, at 2:54 PM, Bernt Hansen wrote:

> 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 <carsten.dominik@gmail.com>
> Date:   Sun Nov 2 17:13:25 2008 +0100
>
>    Don't keep buffers visited during index publishing.
>
> works.
>
> Regards,
> Bernt
>
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode

^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: BUG: Marking repeating tasks done
  2008-11-03 20:39 ` Carsten Dominik
@ 2008-11-03 22:33   ` Bernt Hansen
  0 siblings, 0 replies; 3+ messages in thread
From: Bernt Hansen @ 2008-11-03 22:33 UTC (permalink / raw)
  To: Carsten Dominik; +Cc: emacs-orgmode

Awesome!  Thanks!!

PS. I really like your new commit messages :)

-Bernt


Carsten Dominik <dominik@science.uva.nl> writes:

> Fixed, thanks.
>
> - Carsten
>
> On Nov 3, 2008, at 2:54 PM, Bernt Hansen wrote:
>
>> 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 <carsten.dominik@gmail.com>
>> Date:   Sun Nov 2 17:13:25 2008 +0100
>>
>>    Don't keep buffers visited during index publishing.
>>
>> works.
>>
>> Regards,
>> Bernt
>>
>>
>>
>>
>> _______________________________________________
>> Emacs-orgmode mailing list
>> Remember: use `Reply All' to send replies to the list.
>> Emacs-orgmode@gnu.org
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode

^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2008-11-03 22:33 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2008-11-03 13:54 BUG: Marking repeating tasks done Bernt Hansen
2008-11-03 20:39 ` Carsten Dominik
2008-11-03 22:33   ` Bernt Hansen

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).