mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-11-25 07:27:57 +00:00
Code

org-contacts.el, add note property

Browse Source 
* org-contacts.el (org-contacts-note-property): New varible which add  note property
  (org-contacts-vcard-format): Add the ability  exporting  note property
This commit is contained in:
Feng Shu 2013-04-05 09:54:06 +08:00 committed by Bastien Guerry
parent bb6237c937
commit 61fab323ec
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
contrib/lisp/org-contacts.el
View File

@ -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)