emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ebdb 83bc38c93f: typos (#107)


From: ELPA Syncer
Subject: [elpa] externals/ebdb 83bc38c93f: typos (#107)
Date: Tue, 6 Sep 2022 12:58:17 -0400 (EDT)

branch: externals/ebdb
commit 83bc38c93f262c3e24eb646039d5c2c6e3becd2c
Author: musvaage <112724366+musvaage@users.noreply.github.com>
Commit: GitHub <noreply@github.com>

    typos (#107)
---
 ebdb-com.el  | 6 +++---
 ebdb-test.el | 2 +-
 ebdb.el      | 6 +++---
 3 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/ebdb-com.el b/ebdb-com.el
index 860ea12ee5..eec91e1111 100644
--- a/ebdb-com.el
+++ b/ebdb-com.el
@@ -2700,7 +2700,7 @@ using the function `ebdb-record-completion-table'."
 ;;;###autoload
 (defun ebdb-complete-mail (&optional beg cycle-completion-buffer)
   "In a mail buffer, complete the user name or mail before point.
-Completion happens up to the preceeding colon, comma, or BEG.
+Completion happens up to the preceding colon, comma, or BEG.
 Return non-nil if there is a valid completion, else return nil.
 
 Completion behaviour obeys `ebdb-completion-list' (see there).
@@ -2924,7 +2924,7 @@ as part of the MUA insinuation."
                  (setq done 'unique))
                 (t (setq done 'choose)))))))
 
-    ;; By now, we have considered all possiblities to perform a completion.
+    ;; By now, we have considered all possibilities to perform a completion.
     ;; If nonetheless we haven't done anything so far, consider cycling.
     ;;
     ;; Completion and cycling are really two very separate things.
@@ -2984,7 +2984,7 @@ as part of the MUA insinuation."
       ;; which introduced the variable `completion-base-position'.
       ;; For an older Emacs there is really no satisfactory workaround
       ;; (see GNU Emacs bug #4699), unless we use something radical like
-      ;; advicing `choose-completion-string' (used by EBDB v2).
+      ;; advising `choose-completion-string' (used by EBDB v2).
       (if (string< (substring emacs-version 0 4) "23.2")
           (message "*Completions* buffer requires at least GNU Emacs 23.2")
         ;; `completion-in-region' does not work here as `dwim-completions'
diff --git a/ebdb-test.el b/ebdb-test.el
index 390d232fe7..6cb2ce776e 100644
--- a/ebdb-test.el
+++ b/ebdb-test.el
@@ -375,7 +375,7 @@ If it doesn't exist, raise `ebdb-related-unfound'."
           "O'Toole"))
   (should (equal
           (slot-value
-           (ebdb-parse 'ebdb-field-name-complex "Daniel Micahel Blake 
Day-Lewis")
+           (ebdb-parse 'ebdb-field-name-complex "Daniel Michael Blake 
Day-Lewis")
            'surname)
           "Day-Lewis")))
 
diff --git a/ebdb.el b/ebdb.el
index 45b58131f6..1e44d1118e 100644
--- a/ebdb.el
+++ b/ebdb.el
@@ -901,7 +901,7 @@ if CHILD-P is non-nil, one of its subclasses."
          (throw '--ebdb-loop-exit-- (nreverse acc)))))))
 
 (defmacro ebdb-debug (&rest body)
-  "Excecute BODY just like `progn' with debugging capability.
+  "Execute BODY just like `progn' with debugging capability.
 Debugging is enabled if variable `ebdb-debug' is non-nil during compile.
 You really should not disable debugging.  But it will speed things up."
   (declare (indent 0))
@@ -5237,7 +5237,7 @@ This strips garbage from the user full NAME string."
       (setq name (substring name (match-end 0))))
 
   (if (string-match "^\\([^@]+\\)@" name)
-      ;; The name is really a mail address and we use the part preceeding "@".
+      ;; The name is really a mail address and we use the part preceding "@".
       ;; Everything following "@" is ignored.
       (setq name (match-string 1 name)))
 
@@ -5304,7 +5304,7 @@ single record, otherwise returns a list."
                (push record records))))))))
 
 (defun ebdb-hash-p (key record predicate)
-  "Throw `ebdb-hash-ok' non-nil if KEY matches RECORD acording to PREDICATE.
+  "Throw `ebdb-hash-ok' non-nil if KEY matches RECORD according to PREDICATE.
 PREDICATE may take the same values as the elements of `ebdb-completion-list'."
   (if (and (seq-intersection '(name ebdb-field-name) predicate)
            (ebdb-string= key (or (ebdb-record-name-string record) "")))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]