diff options
author | Michael Strey <mstrey@strey.biz> | 2013-04-26 12:06:34 +0200 |
---|---|---|
committer | Grégoire Jadi <gregoire.jadi@gmail.com> | 2013-04-30 11:04:39 +0200 |
commit | 7fe371ceb2891f415a23b3cfcd6600da806fe788 (patch) | |
tree | 7c27cc2f68f1f7a4957b25d3c5f3594ef71fe4fa | |
parent | 09167e96c09f43ff2231272787e5cce08a153122 (diff) | |
download | org-mode-7fe371ceb2891f415a23b3cfcd6600da806fe788.tar.gz |
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
-rw-r--r-- | contrib/lisp/org-contacts.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/contrib/lisp/org-contacts.el b/contrib/lisp/org-contacts.el index a3c4aed..626ad7a 100644 --- a/contrib/lisp/org-contacts.el +++ b/contrib/lisp/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) |