branch: externals/org-contacts
commit 963e757d4674c9851774336ae699792b6fc55ac3
Author: stardiviner <[email protected]>
Commit: stardiviner <[email protected]>

    Fix `org-contacts-identity-properties-list': ‘list’ without arguments
---
 org-contacts.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/org-contacts.el b/org-contacts.el
index 6acfd39e38..6a16bb84fa 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -844,15 +844,15 @@ This function should be called from 
`gnus-article-prepare-hook'."
 ;;====================================== org-contacts searching 
=====================================
 
 (defcustom org-contacts-identity-properties-list
-  (list org-contacts-email-property
-        org-contacts-alias-property
-        org-contacts-tel-property
-        org-contacts-address-property
-        org-contacts-birthday-property)
+  '(org-contacts-email-property
+    org-contacts-alias-property
+    org-contacts-tel-property
+    org-contacts-address-property
+    org-contacts-birthday-property)
   "Matching rule for finding heading that are contacts.
 This can be property key checking."
   :type 'list
-  :safe 'listp)
+  :safe #'listp)
 
 (defvar org-contacts-ahead-space-padding (make-string 5 ? )
   "The space padding for align avatar image with contact name and properties.")

Reply via email to