summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRüdiger Sonderfeld <ruediger@c-plusplus.de>2013-02-14 16:41:36 +0100
committerGrégoire Jadi <gregoire.jadi@gmail.com>2013-02-14 21:41:25 +0100
commit614a80490ff3c7d1c118e5d6623753666e8089ee (patch)
tree04f0eddc23c77f5fec2dde8917a6f85d0409006c
parentaff4b0b2de05fb069e8641f49930b051d068617a (diff)
downloadorg-mode-614a80490ff3c7d1c118e5d6623753666e8089ee.tar.gz
org-contacts: Fix Agenda format.
* contrib/lisp/org-contacts.el: Use `org-agenda-prefix-format' to format entry instead of unused org-agenda-format. Signed-off-by: Rüdiger Sonderfeld <ruediger@c-plusplus.de>
-rw-r--r--contrib/lisp/org-contacts.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/contrib/lisp/org-contacts.el b/contrib/lisp/org-contacts.el
index e3ec7c7..3ad581d 100644
--- a/contrib/lisp/org-contacts.el
+++ b/contrib/lisp/org-contacts.el
@@ -573,9 +573,9 @@ This function should be called from `gnus-article-prepare-hook'."
(let ((org-agenda-files (org-contacts-files))
(org-agenda-skip-function
(lambda () (org-agenda-skip-if nil `(notregexp ,name))))
- (org-agenda-format (propertize
- "%(org-contacts-icon-as-string)% p% s%(org-contacts-irc-number-of-unread-messages)%+T"
- 'keymap org-contacts-keymap))
+ (org-agenda-prefix-format (propertize
+ "%(org-contacts-icon-as-string)% s%(org-contacts-irc-number-of-unread-messages) "
+ 'keymap org-contacts-keymap))
(org-agenda-overriding-header
(or org-agenda-overriding-header
(concat "List of contacts matching `" name "':"))))