From d6824ec3c27d927968368979d2735cc1543051c7 Mon Sep 17 00:00:00 2001 From: Aaron Ecay Date: Sat, 27 Jul 2013 01:17:54 -0400 Subject: [PATCH] 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 a220993..97171d0 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."