From 0417bb6f11828ef55bd451d7523f4f954963bd87 Mon Sep 17 00:00:00 2001 Message-Id: <0417bb6f11828ef55bd451d7523f4f954963bd87.1305223167.git.markert.michael@googlemail.com> From: Michael Markert Date: Thu, 12 May 2011 19:55:10 +0200 Subject: [PATCH] Fix `org-contacts-wl-get-name-email'. To: emacs-orgmode@gnu.org --- contrib/lisp/org-contacts.el | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/contrib/lisp/org-contacts.el b/contrib/lisp/org-contacts.el index ff4374d..192cb45 100644 --- a/contrib/lisp/org-contacts.el +++ b/contrib/lisp/org-contacts.el @@ -423,9 +423,9 @@ Depends on Wanderlust been loaded." (defun org-contacts-wl-get-name-email () "Get name and email address from wanderlust email. See `org-contacts-wl-get-from-header-content' for limitations." - (let ((from (wl-get-from-header-content))) + (let ((from (org-contacts-wl-get-from-header-content))) (when from - (cons (wl-address-header-extract-realname from) + (list (wl-address-header-extract-realname from) (wl-address-header-extract-address from))))) (defun org-contacts-template-wl-name (&optional return-value) -- 1.7.5.1