From mboxrd@z Thu Jan 1 00:00:00 1970 From: Feng Shu Subject: Fix bugs introduced by "[patch] add 'tel' and 'note' property' Date: Sun, 07 Apr 2013 11:16:18 +0800 Message-ID: <87obdr114t.fsf_-_@news.tumashu-localhost.org> References: <87ehep3eee.fsf@news.tumashu-localhost.org> <874nflv5ta.fsf@bzg.ath.cx> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([208.118.235.92]:46482) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UOg5q-000280-6P for emacs-orgmode@gnu.org; Sat, 06 Apr 2013 23:16:37 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1UOg5l-0006mt-1p for emacs-orgmode@gnu.org; Sat, 06 Apr 2013 23:16:34 -0400 Received: from mail-pd0-f169.google.com ([209.85.192.169]:53228) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UOg5k-0006ml-Rk for emacs-orgmode@gnu.org; Sat, 06 Apr 2013 23:16:28 -0400 Received: by mail-pd0-f169.google.com with SMTP id 10so2648210pdc.14 for ; Sat, 06 Apr 2013 20:16:27 -0700 (PDT) Received: from feng by tumashu with local (Exim 4.80) (envelope-from ) id 1UOg5a-0002br-VH for emacs-orgmode@gnu.org; Sun, 07 Apr 2013 11:16:18 +0800 In-Reply-To: <874nflv5ta.fsf@bzg.ath.cx> (Bastien's message of "Fri, 05 Apr 2013 08:40:17 +0200") List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org --=-=-= Content-Type: text/x-diff; charset=utf-8 Content-Disposition: inline; filename=0001-PATCH-org-contacts.el-fix-bugs-about-tel-and-note-pr.patch Content-Transfer-Encoding: quoted-printable >From 4eb305cdf2f7c59b8e014514c0409d4da2eb9eab Mon Sep 17 00:00:00 2001 From: Feng Shu 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 =E4=B8=AA=E6=96=87=E4=BB=B6=E8=A2=AB=E4=BF=AE=E6=94=B9=EF=BC=8C=E6=8F=92= =E5=85=A5 2 =E8=A1=8C(+) 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-birthda= y-property properties)))) (addr (cdr (assoc-string org-contacts-address-property properties))) (nick (org-contacts-vcard-escape (cdr (assoc-string org-contacts-nicknam= e-property properties)))) --=20 1.7.10.4 --=-=-= Content-Type: text/plain -- --=-=-=--