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

@@ -1,5 +1,8 @@
 2009-09-18  Carsten Dominik  <carsten.dominik@gmail.com>
 
+	* 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.
 

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)))