org-contacts: Fix org-contacts-matcher for BIRTHDAYs

* contrib/lisp/org-contacts.el (org-contacts-matcher): Fix expression to
  work for BIRTHDAY-only contacts.
This commit is contained in:
Jan Malakhovski 2015-12-27 14:47:56 +00:00 committed by Nicolas Goaziou
parent 33c5e0582c
commit 2ec03e18b8

View file

@ -159,12 +159,14 @@ The following replacements are available:
:group 'org-contacts) :group 'org-contacts)
(defcustom org-contacts-matcher (defcustom org-contacts-matcher
(mapconcat 'identity (list org-contacts-email-property (mapconcat #'identity
(mapcar (lambda (x) (concat x "<>\"\""))
(list org-contacts-email-property
org-contacts-alias-property org-contacts-alias-property
org-contacts-tel-property org-contacts-tel-property
org-contacts-address-property org-contacts-address-property
org-contacts-birthday-property) org-contacts-birthday-property))
"<>\"\"|") "|")
"Matching rule for finding heading that are contacts. "Matching rule for finding heading that are contacts.
This can be a tag name, or a property check." This can be a tag name, or a property check."
:type 'string :type 'string