From e3cdd782f836d9e20f8d656772014a4e0bf50551 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Fri, 18 Sep 2009 22:03:08 +0100 Subject: [PATCH] Fix text property problem in char after TODO in agenda This character did not have text properties and therefore many commands did not work at that position. Reported by Bernt Hansen. --- lisp/ChangeLog | 3 +++ lisp/org-agenda.el | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 74f8cf9c7..526234aea 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2009-09-18 Carsten Dominik + * org-agenda.el (org-agenda-highlight-todo): Fix text property + problem. + * org-mobile.el (org-mobile-capture-file): Use `mobileorg.org' as the capture file, and make it non-configurable. diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 02124a65c..4f084246a 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -4784,7 +4784,7 @@ HH:MM." (setq x (concat (substring x 0 (match-end 1)) (format org-agenda-todo-keyword-format (match-string 2 x)) - " " + (org-add-props " " (text-properties-at 0 x)) (substring x (match-end 3))))) x)))