emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org-contacts d6824ec3c2 069/154: org-contacts: use `org


From: ELPA Syncer
Subject: [elpa] externals/org-contacts d6824ec3c2 069/154: org-contacts: use `org-' prefixed variants of cl functions
Date: Fri, 9 Sep 2022 15:58:27 -0400 (EDT)

branch: externals/org-contacts
commit d6824ec3c27d927968368979d2735cc1543051c7
Author: Aaron Ecay <aaronecay@gmail.com>
Commit: Aaron Ecay <aaronecay@gmail.com>

    org-contacts: use `org-' prefixed variants of cl functions
    
    * contrib/lisp/org-contacts.el 
(org-contacts-remove-ignored-property-values):
    Use `org-remove-if' and `org-find-if' instead of the unprefixed variants.
---
 org-contacts.el | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/org-contacts.el b/org-contacts.el
index a220993685..97171d0377 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -516,11 +516,11 @@ A group FOO is composed of contacts with the tag FOO."
 (defun org-contacts-remove-ignored-property-values (ignore-list list)
   "Remove all ignore-list's elements from list and you can use
    regular expressions in the ignore list."
-    (remove-if (lambda (el)
-               (find-if (lambda (x)
-                          (string-match-p x el))
-                        ignore-list))
-             list))
+    (org-remove-if (lambda (el)
+                    (org-find-if (lambda (x)
+                                   (string-match-p x el))
+                                 ignore-list))
+                  list))
 
 (defun org-contacts-complete-name (start end string)
   "Complete text at START with a user name and email."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]