Re: org-add-note not working with winner-mode

[Suvayu Ali <fatkasuvayu+linux@gmail.com>]

[-- Attachment #1: Type: text/plain, Size: 1629 bytes --]

Hi Orgers,

I finally managed to get to this. I think the problem with winner mode
was a side-effect. The actual problem appears when you set to log
changes to TODO states and you attempt to make the changes from the
agenda. (Changing from the org buffer works fine)

On Mon, 4 Apr 2011 10:00:50 -0700
Samuel Wales <samologist@gmail.com> wrote:

> IIRC org-add-note works in a way that is unexpected.  I think it makes
> its actions happen after the command itself.  I got bitten by that for
> something else; maybe it is related here.
> 

From my observations it seems the above statement might be related to
the issue. I see that setting to record notes or TODO state changes like
this: "DONE(d@/!)", "DONE(d!)" or "DONE(d@)" triggers the problem. After
changing the TODO state from the agenda, org doesn't prompt me (in case
of @) or doesn't insert the time stamp (in case of !). However it does
write an empty LOGBOOK drawer. When I visit the headline subsequently by
hitting TAB from the agenda, I get prompted for the note or the
timestamp gets recorded as the case maybe for the particular keyword.

I have attached the minimal org setup I used to replicate this along
with an example org file. If I change more than one TODO states from the
agenda before visiting the org file, only the last TODO state change is
logged. For all the preceding changes, I only get an empty drawer.

As the last time, I don't see the problem when I am using Emacs 23.2. I
hope I have been able to explain the problem clearly this time.

Thanks,

-- 
Suvayu

Open source is the future. It sets us free.

[-- Attachment #2: test.org --]
[-- Type: text/plain, Size: 646 bytes --]


* DONE Debug TODO state change logging
  CLOSED: [2011-04-14 Thu 14:12]
  :LOGBOOK:
  - State "CONT"       from "TODO"       [2011-04-14 Thu 14:11]
  :END:

* DONE Write minimal org setup
  CLOSED: [2011-04-14 Thu 14:11]
  :LOGBOOK:
  - State "DONE"       from "TODO"       [2011-04-14 Thu 14:11] \\
    this is a note
  :END:

* DONE Write minimal demo file
  CLOSED: [2011-04-14 Thu 14:11]
  :LOGBOOK:
  :END:

* DONE Send email to list
  CLOSED: [2011-04-14 Thu 14:12]
  :LOGBOOK:
  - State "DONE"       from "CONT"       [2011-04-14 Thu 14:12]
  - State "CONT"       from "TODO"       [2011-04-14 Thu 14:12]
  :END:

[-- Attachment #3: min.el --]
[-- Type: text/x-emacs-lisp, Size: 997 bytes --]

(setq debug-on-error t
      debug-on-signal nil
      debug-on-quit nil)

(add-to-list 'load-path (expand-file-name "~/build/org-mode/lisp"))
(add-to-list 'load-path (expand-file-name "~/build/org-mode/contrib/lisp"))

(require 'org-install)
(require 'org-inlinetask)

(setq org-agenda-files '("~/org")
      ;; log time for TODO state changes
      org-log-done 'time
      ;; log time on rescheduling
      org-log-reschedule 'time
      ;; log time on changing deadline
      org-log-redeadline 'time
      ;; To put notes inside LOGBOOK drawer
      org-log-into-drawer t
      )

(setq org-todo-keywords
      '((sequence "TODO(t)" "DLAY(l@/!)" "CONT(c!)" "|" "DONE(d@/!)" "CNCL(n@/!)")
	))

(setq org-todo-keyword-faces
      '(("CNCL" . (:background "snow3" :foreground "black" :weight bold))
	))

(global-set-key (kbd "C-c a") 'org-agenda)
(global-set-key (kbd "C-c l") 'org-store-link)
(global-set-key (kbd "C-c C-l") 'org-insert-link-global)
(global-set-key (kbd "C-c b") 'org-switchb)