[elpa] scratch/org-contacts-rebased 5a2519c 048/118: org-contacts.el, add note property

[Stefan Monnier]

branch: scratch/org-contacts-rebased
commit 5a2519c5578fbcca9bd1a502d95ee0582fcd33b2
Author: Feng Shu <tumashu@gmail.com>
Commit: Bastien Guerry <bzg@altern.org>

    org-contacts.el, add note property
    
    * org-contacts.el (org-contacts-note-property): New varible which add  note 
property
      (org-contacts-vcard-format): Add the ability  exporting  note property
---
 org-contacts.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/org-contacts.el b/org-contacts.el
index b85ae2d..5f16d41 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -71,6 +71,11 @@ When set to nil, all your Org files will be used."
   :type 'string
   :group 'org-contacts)
 
+(defcustom org-contacts-note-property "NOTE"
+  "Name of the property for contact note."
+  :type 'string
+  :group 'org-contacts)
+
 (defcustom org-contacts-birthday-format "Birthday: %l (%Y)"
   "Format of the anniversary agenda entry.
 The following replacements are available:
@@ -841,6 +846,7 @@ to do our best."
                        (calendar-extract-month cal-bday)
                        (calendar-extract-day cal-bday))))
            (when nick (format "NICKNAME:%s\n" nick))
+           (when note (format "NOTE:%s\n" note))
            "END:VCARD\n\n")))
 
 (defun org-contacts-export-as-vcard (&optional name file to-buffer)