[elpa] externals/org-contacts 1d70236144 054/154: org-contacts.el (org-contacts-matcher): Better matcher

[ELPA Syncer]

branch: externals/org-contacts
commit 1d702361440194b68e511a442fb0941ffe313a47
Author: Bastien Guerry <bzg@altern.org>
Commit: Bastien Guerry <bzg@altern.org>

    org-contacts.el (org-contacts-matcher): Better matcher
    
    * contrib/lisp/org-contacts.el (org-contacts-matcher): Better matcher.
    
    Thanks to Simon Thum for suggesting this.
---
 org-contacts.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/org-contacts.el b/org-contacts.el
index 534372fcb3..f529014fa8 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -127,7 +127,12 @@ The following replacements are available:
   :type 'string
   :group 'org-contacts)
 
-(defcustom org-contacts-matcher (concat org-contacts-email-property "<>\"\"")
+(defcustom org-contacts-matcher
+  (mapconcat 'identity (list org-contacts-email-property
+                            org-contacts-tel-property
+                            org-contacts-address-property
+                            org-contacts-birthday-property)
+                            "<>\"\"|")
   "Matching rule for finding heading that are contacts.
 This can be a tag name, or a property check."
   :type 'string