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."