[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] Fix bugs introduced by "[patch] add 'tel' and 'note' property'
From: |
Feng Shu |
Subject: |
[O] Fix bugs introduced by "[patch] add 'tel' and 'note' property' |
Date: |
Sun, 07 Apr 2013 11:16:18 +0800 |
User-agent: |
Gnus/5.130006 (Ma Gnus v0.6) Emacs/24.2 (gnu/linux) |
>From 4eb305cdf2f7c59b8e014514c0409d4da2eb9eab Mon Sep 17 00:00:00 2001
From: Feng Shu <address@hidden>
Date: Sun, 7 Apr 2013 11:12:09 +0800
Subject: [PATCH] [PATCH] org-contacts.el , fix bugs about 'tel and 'note
properties
* contrib/lisp/org-contacts.el (org-contacts-vcard-format): fix bug
prvious intruduced ,add 'tel and 'note
---
contrib/lisp/org-contacts.el | 2 ++
1 个文件被修改,插入 2 行(+)
diff --git a/contrib/lisp/org-contacts.el b/contrib/lisp/org-contacts.el
index f529014..65eeea8 100644
--- a/contrib/lisp/org-contacts.el
+++ b/contrib/lisp/org-contacts.el
@@ -834,6 +834,8 @@ to do our best."
(name (org-contacts-vcard-escape (car contact)))
(n (org-contacts-vcard-encode-name name))
(email (cdr (assoc-string org-contacts-email-property properties)))
+ (tel (cdr (assoc-string org-contacts-tel-property properties)))
+ (note (cdr (assoc-string org-contacts-note-property properties)))
(bday (org-contacts-vcard-escape (cdr (assoc-string
org-contacts-birthday-property properties))))
(addr (cdr (assoc-string org-contacts-address-property properties)))
(nick (org-contacts-vcard-escape (cdr (assoc-string
org-contacts-nickname-property properties))))
--
1.7.10.4
--