org-contacts.el: Rename a function to follow emacs-lisp coding conventions
* contrib/lisp/org-contacts.el (org-contacts-db-need-update-p): Replace the '?' by a '-p'. (org-contacts-db): Use the new name.
This commit is contained in:
parent
1313bd7bb0
commit
abbf3a9a25
1 changed files with 2 additions and 2 deletions
|
@ -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)
|
||||
|
|
Loading…
Reference in a new issue