branch: scratch/org-contacts-rebased
commit d7412d58943df9ca0b4a09399cc85cc0c1118c41
Author: Michael Strey <[email protected]>
Commit: Grégoire Jadi <[email protected]>
contrib/lisp/org-contacts: Fix two typos in comments
* contrib/lisp/org-contacts.el (org-contacts-db): fix typo in the
word `matching'.
* contrib/lisp/org-contacts.el (org-contacts-complete-group): fix typo
in the word `found'.
TINYCHANGE
---
org-contacts.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/org-contacts.el b/org-contacts.el
index a3c4aed..626ad7a 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -225,7 +225,7 @@ This overrides `org-email-link-description-format' if set."
org-contacts-db))
(defun org-contacts-filter (&optional name-match tags-match)
- "Search for a contact maching NAME-MATCH and TAGS-MATCH.
+ "Search for a contact matching NAME-MATCH and TAGS-MATCH.
If both match values are nil, return all contacts."
(if (and (null name-match)
(null tags-match))
@@ -433,7 +433,7 @@ A group FOO is composed of contacts with the tag FOO."
(or (cdr (assoc-string "ALLTAGS" (caddr
contact))) "") ":")))))))
(list start end
(if (= (length completion-list) 1)
- ;; We've foudn the correct group, returns the address
+ ;; We've found the correct group, returns the address
(lexical-let ((tag (get-text-property 0 'org-contacts-group
(car completion-list))))
(lambda (string pred &optional to-ignore)
