org-agenda: Tiny fix

* lisp/org-agenda.el (org-agenda-format-item): Check if string isn't
  empty before searching for text properties.
This commit is contained in:
Nicolas Goaziou 2014-05-24 15:38:52 +02:00
parent abe931dca9
commit fdb40fbe01
1 changed files with 2 additions and 1 deletions

View File

@ -6443,7 +6443,8 @@ Any match of REMOVE-RE will be removed from TXT."
(category-icon (if category-icon
(propertize " " 'display category-icon)
""))
(effort (get-text-property 1 'effort txt))
(effort (and (not (string= txt ""))
(get-text-property 1 'effort txt)))
;; time, tag, effort are needed for the eval of the prefix format
(tag (if tags (nth (1- (length tags)) tags) ""))
time