diff --git a/org-contacts.el b/org-contacts.el
index 8674533..9045087 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -160,7 +160,7 @@ This overrides `org-email-link-description-format' if set."
   "Return list of Org files to use for contact management."
   (or org-contacts-files (org-agenda-files t 'ifmode)))
 
-(defun org-contacts-db-need-update? ()
+(defun org-contacts-db-need-update-p ()
   "Determine whether `org-contacts-db' needs to be refreshed."
   (or (null org-contacts-last-update)
       (some (lambda (file)
@@ -174,7 +174,7 @@ This overrides `org-email-link-description-format' if set."
 	 (contacts-matcher
 	  (cdr (org-make-tags-matcher org-contacts-matcher)))
 	 markers result)
-    (when (org-contacts-db-need-update?)
+    (when (org-contacts-db-need-update-p)
       (message "Update Org Contacts Database")
       (dolist (file (org-contacts-files))
 	(org-check-agenda-file file)