Re: Re: Possible bug in TODO ALL agenda fast tag filter generation?

[Carsten Dominik <carsten.dominik@gmail.com>]

Applied, thanks.

- Carsten

On Apr 7, 2010, at 12:20 PM, Tim O'Callaghan wrote:

> The problem is that "org-todo-keywords-1" is set for each agenda file
> parsed, and that list is appended onto the
> "org-todo-keywords-for-agenda" without any de-duplication.
> The patch below fixes the problem, but possibly not in the best way.
>
> regards,
>
> Tim.
>
> diff --git a/lisp/org.el b/lisp/org.el
> index d80bb91..6a663b3 100644
> --- a/lisp/org.el
> +++ b/lisp/org.el
> @@ -14960,6 +14960,8 @@ When a buffer is unmodified, it is just
> killed.  When modified, it is saved
>                (add-text-properties
>                 (match-beginning 0) (org-end-of-subtree t) pc)))
>            (set-buffer-modified-p bmp)))))
> +    (setq org-todo-keywords-for-agenda
> +          (org-uniquify org-todo-keywords-for-agenda))
>     (setq org-todo-keyword-alist-for-agenda
>          (org-uniquify org-todo-keyword-alist-for-agenda)
>          org-tag-alist-for-agenda (org-uniquify org-tag-alist-for- 
> agenda))))
>
>
> On 7 April 2010 11:47, Tim O'Callaghan <tim.ocallaghan@gmail.com>  
> wrote:
>> Any idea why this is happening? I'm seeing it with the agenda t
>> (global todo all)
>>
>> -----------
>> Global list of TODO items of type: ALL
>> Available with `N r': (0)ALL (1)TODO (2)NEXT (3)WAITING (4)APPT
>> (5)DONE (6)DEFERRED (7)CANCELLED (8)PROJECT (9)SOMEDAY (10)PROJDONE
>> (11)PROJCANC (12)TODO (13)NEXT (14)WAITING (15)APPT (16)DONE
>> (17)DEFERRED (18)CANCELLED (19)PROJECT (20)SOMEDAY (21)PROJDONE
>> (22)PROJCANC (23)TODO (24)NEXT (25)WAITING (26)APPT (27)DONE
>> (28)DEFERRED (29)CANCELLED (30)PROJECT (31)SOMEDAY (32)PROJDONE
>> (33)PROJCANC (34)TODO (35)NEXT (36)WAITING (37)APPT (38)DONE
>> (39)DEFERRED (40)CANCELLED (41)PROJECT (42)SOMEDAY (43)PROJDONE
>> (44)PROJCANC (45)TODO (46)NEXT (47)WAITING (48)APPT (49)DONE
>> (50)DEFERRED (51)CANCELLED (52)PROJECT (53)SOMEDAY (54)PROJDONE
>> (55)PROJCANC (56)TODO (57)NEXT (58)WAITING (59)APPT (60)DONE
>> (61)DEFERRED (62)CANCELLED (63)PROJECT (64)SOMEDAY (65)PROJDONE
>> (66)PROJCANC (67)TODO (68)NEXT (69)WAITING (70)APPT (71)DONE
>> (72)DEFERRED (73)CANCELLED (74)PROJECT (75)SOMEDAY (76)PROJDONE
>> (77)PROJCANC (78)TODO (79)NEXT (80)WAITING (81)APPT (82)DONE
>> (83)DEFERRED (84)CANCELLED (85)PROJECT (86)SOMEDAY (87)PROJDONE
>> (88)PROJCANC (89)TODO (90)NEXT (91)WAITING (92)APPT (93)DONE
>> (94)DEFERRED (95)CANCELLED (96)PROJECT (97)SOMEDAY (98)PROJDONE
>> (99)PROJCANC
>> -----------
>>
>>
>> My todo-keywords config is this:
>>
>> (setq org-todo-keywords
>>      (quote
>>       ((sequence "TODO(1!)" "NEXT(2!/!)" "WAITING(3@/!)" "APPT(4@/!)"
>>                  "|" "DONE(0!/@!)" "DEFERRED(D@!/!)"  
>> "CANCELLED(C@!/!)")
>>        (type "PROJECT(P!/@!)" "SOMEDAY(S!/@!)" "|" "PROJDONE"  
>> "PROJCANC")
>>        ))
>>      org-todo-keyword-faces
>>      (quote
>>       (
>>        ("TODO" :foreground "orangered" :weight bold)
>>        ("NEXT" :foreground "gold" :weight bold)
>>        ("DONE" :foreground "forest green" :weight bold)
>>        ("WAITING" :foreground "orange" :weight bold)
>>        ("CANCELLED" :foreground "indianred" :weight bold)
>>        ;; project level todo indicators
>>        ("SOMEDAY" :foreground "orchid" :weight bold)
>>        ("PROJECT" :foreground "grey" :weight bold)
>>        ("PROJDONE" :foreground "forest green" :weight bold)
>>        ("PROJCANC" :foreground "indianred" :weight bold)
>>        )))
>>
>>
>> Using git emacs 23 org git source (both as of this morning)
>>
>> Tim.
>>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode

- Carsten