; Fix typos.

diff --git a/ChangeLog.3 b/ChangeLog.3
index d0ff14117be32ecfc8f040a9dd28eca6f0bf5135..907eb2ce6ff1efac8ff43c3bd8549d8a8e9601a9 100644 (file)
--- a/ChangeLog.3
+++ b/ChangeLog.3
@@ -2276,7 +2276,7 @@
 
 2021-12-27  Eli Zaretskii  <eliz@gnu.org>
 
-       Fix typos in in 'reset-language-environment'
+       Fix typos in 'reset-language-environment'
 
        * lisp/international/mule-cmds.el (reset-language-environment):
        Fix a typo in 'windows-nt'.  (Bug#52816)
@@ -15459,7 +15459,7 @@
        Fix automatic hscrolling when line numbers are displayed
 
        * src/xdisp.c (hscroll_window_tree): When line numbers are
-       displayed, account for the the line-number space when calculating
+       displayed, account for the line-number space when calculating
        the desired X coordinate on the left.  (Bug#49891)
 
 2021-08-06  Eli Zaretskii  <eliz@gnu.org>
@@ -27169,7 +27169,7 @@
        * lisp/minibuffer.el (minibuffer--sort-by-length-alpha): New function.
        (minibuffer--sort-by-position): New function extracted from
        `completion-all-sorted-completions`.
-       (completion-all-sorted-completions): Use use them.
+       (completion-all-sorted-completions): Use them.
 
 2021-04-19  Daniel Mendler  <mail@daniel-mendler.de>
 
@@ -42218,7 +42218,7 @@
        string in the byte-code (so the two branches return `eq` strings).
 
        So, I think using `iso-2022-jp` is a bad idea here: it gives the
-       illusion that the the `charset` info exists, even it will be lost.
+       illusion that the `charset` info exists, even it will be lost.
        Eli discussed it with Handa-san a year ago, and they arrived at the
        conclusion that the charset information is indeed no longer important.
 
@@ -67358,7 +67358,7 @@
        wdired-do-renames: Speed up for long Emacs sessions
 
        `dired-rename-file' calls unconditionally `dired-rename-subdir'.
-       The second function performs performs a loop on all the Emacs
+       The second function performs a loop on all the Emacs
        buffers; this step is only needed if FILE is a directory (bug#32899).
 
        In a long lived Emacs session, this can make a difference
@@ -74306,7 +74306,7 @@
 
        (Bug#42563)
 
-       For some time, Eldoc has has some Elisp-specific code that shouldn't
+       For some time, Eldoc has some Elisp-specific code that shouldn't
        live there, but in elisp-mode.el.  This can be fixed in Emacs master,
        but since ElDoc is distributed in GNU Elpa and is meant to work with
        Emacs 26 and 27, this means that that elisp-specific code must still
@@ -74558,7 +74558,7 @@
 
        Do this conservatively for now: if the ElDoc helper buffer (as
        returned by eldoc--doc-buffer) is visible and showing documentation
-       for the very same "situation" (as computed by the the new
+       for the very same "situation" (as computed by the new
        eldoc--request-state helper), don't request that documentation from
        sources again.
 
@@ -77976,7 +77976,7 @@
 
        * lisp/emacs-lisp/comp.el (comp-symbol-values-optimizable): New
        defconst.
-       (comp-function-call-maybe-remove): New logic to to remove
+       (comp-function-call-maybe-remove): New logic to remove
        unnecessary `symbol-value' calls.
 
 2020-06-07  Juri Linkov  <juri@linkov.net>
@@ -85368,7 +85368,7 @@
 
 2020-03-10  AndreaCorallo  <akrl@sdf.org>
 
-       * Fix store_function_docstring for for native functions
+       * Fix store_function_docstring for native functions
 
        Do not Nil native_doc fields.  This will be naturally dumped by
        pdumper.  This was affecting dumped functions.
@@ -114426,7 +114426,7 @@
 
 2019-08-21  Nicolas Petton  <nicolas@petton.fr>
 
-       * etc/HISTORY: Add Emacs 26.3 release release date.
+       * etc/HISTORY: Add Emacs 26.3 release date.
 
 2019-08-21  Nicolas Petton  <nicolas@petton.fr>
 
@@ -117408,7 +117408,7 @@
 
 2019-07-30  Lars Ingebrigtsen  <larsi@gnus.org>
 
-       Use decoded time accessors in in em-ls
+       Use decoded time accessors in em-ls
 
        * lisp/eshell/em-ls.el (eshell-ls-file): Use decoded time
        accessors.
@@ -118983,7 +118983,7 @@
        * doc/lispref/hash.texi (Creating Hash, Defining Hash):
        * src/fns.c (Fsxhash_eq, Fsxhash_eql, Fsxhash_equal):
        Say that hashes are fixnums.
-       (Fmake_hash_table): Say that that an integer rehash-size
+       (Fmake_hash_table): Say that an integer rehash-size
        should be a fixnum.
        * doc/lispref/hash.texi (Defining Hash): Say that hash and
        comparison functions should be consistent and pure, and should
@@ -128629,7 +128629,7 @@
 
        * lisp/emacs-lisp/package.el (package-install-from-archive): Fix last change
 
-       Don't place the unibyte content of of the downloaded file into
+       Don't place the unibyte content of the downloaded file into
        a multibyte buffer.
 
 2019-05-24  Michael Albinus  <michael.albinus@gmx.de>
@@ -149671,7 +149671,7 @@
 
        * lisp/textmodes/bibtex.el (bibtex-next-entry)
        (bibtex-previous-entry): New commands.
-       (bibtex-mode-map): Bind to to forward-paragraph and
+       (bibtex-mode-map): Bind to forward-paragraph and
        backward-paragraph.  Add to menu under "Moving inside an Entry".
 
 2018-08-27  Noam Postavsky  <npostavs@gmail.com>
@@ -186529,7 +186529,7 @@
        Lay some groundwork for a more flexible approach that allows for
        different classes of diagnostics, not necessarily line-based.
        Importantly, one overlay per diagnostic is created, whereas the
-       original implementation had one per line, and on it it concatenated
+       original implementation had one per line, and on it concatenated
        the results of errors and warnings.
 
        This means that currently, an error and warning on the same line are

diff --git a/doc/emacs/ChangeLog.1 b/doc/emacs/ChangeLog.1
index c1c5f5407da7e28e1eaacf2bdccc1ec2d26aaae8..048b7bd99a5bc816eb9554fe15585c1161664b5e 100644 (file)
--- a/doc/emacs/ChangeLog.1
+++ b/doc/emacs/ChangeLog.1
@@ -8529,7 +8529,7 @@
        * text.texi (Cell Justification):
        * trouble.texi (After a Crash):
        * xresources.texi (GTK styles):
-       Delete duplicate duplicate words.
+       Delete duplicate words.
 
 2005-07-17  Richard M. Stallman  <rms@gnu.org>
 

diff --git a/doc/misc/ert.texi b/doc/misc/ert.texi
index 91288db45a2b92b2efac1fafecd0ab1c1479522c..4dccd8edcf026719f983391e532b3851fb7152e6 100644 (file)
--- a/doc/misc/ert.texi
+++ b/doc/misc/ert.texi
@@ -321,7 +321,7 @@ Show the list of @code{should} forms executed in the test
 @kindex m@r{, in ert results buffer}
 @findex ert-results-pop-to-messages-for-test-at-point
 Show any messages that were generated (with the Lisp function
-@code{message}) in in a test or any of the code that it invoked
+@code{message}) in a test or any of the code that it invoked
 (@code{ert-results-pop-to-messages-for-test-at-point}).
 
 @item L

diff --git a/lisp/elec-pair.el b/lisp/elec-pair.el
index fa4d6d9849cfd4bc36dac51ae6307a6d258fc8b1..720f60836814f03295d35e30c0dbb64ffa0bac6b 100644 (file)
--- a/lisp/elec-pair.el
+++ b/lisp/elec-pair.el
@@ -503,8 +503,8 @@ The decision is taken by order of preference:
 
 * According to C's syntax and the syntactic state of the buffer
   (both as defined by the major mode's syntax table).  This is
-  done by looking up up the variables
-  `electric-pair-inhibit-predicate', `electric-pair-skip-self'
+  done by looking up the variables
+ `electric-pair-inhibit-predicate', `electric-pair-skip-self'
   and `electric-pair-skip-whitespace' (which see)."
   (let* ((pos (and electric-pair-mode (electric--after-char-pos)))
          (skip-whitespace-info))

diff --git a/lisp/emacs-lisp/cl-preloaded.el b/lisp/emacs-lisp/cl-preloaded.el
index ec9fd86a55cc16708614da054df36a4ed4315efa..94f9654b23936bb343a84f58b44bbef5c1816692 100644 (file)
--- a/lisp/emacs-lisp/cl-preloaded.el
+++ b/lisp/emacs-lisp/cl-preloaded.el
@@ -146,7 +146,7 @@ supertypes from the most specific to least specific.")
   (while (recordp parent)
     (add-to-list (cl--struct-class-children-sym parent) tag)
     ;; Only register ourselves as a child of the leftmost parent since structs
-    ;; can only only have one parent.
+    ;; can only have one parent.
     (setq parent (car (cl--struct-class-parents parent)))))
 
 ;;;###autoload

diff --git a/lisp/org/ob-comint.el b/lisp/org/ob-comint.el
index 427aba341504eac2d8ddd64b24b0a1846d01f37a..c99d6a8ba71917c6157df3f66f6bfa868fba773b 100644 (file)
--- a/lisp/org/ob-comint.el
+++ b/lisp/org/ob-comint.el
@@ -166,7 +166,7 @@ source block, and the name of the temp file.")
 (defvar-local org-babel-comint-async-chunk-callback nil
   "Callback function to clean Babel async output results before insertion.
 Its single argument is a string consisting of output from the
-comint process.  It should return a string that will be be passed
+comint process.  It should return a string that will be passed
 to `org-babel-insert-result'.")
 
 (defvar-local org-babel-comint-async-dangling nil

diff --git a/lisp/org/ol-doi.el b/lisp/org/ol-doi.el
index 94585e4c3e54f92259c32789260f1e547bbc9b39..56239f65d439cc6e9bd0c6ef53eae23c52a09317 100644 (file)
--- a/lisp/org/ol-doi.el
+++ b/lisp/org/ol-doi.el
@@ -44,7 +44,7 @@ PATH is a the path to search for, as a string."
   "Export a \"doi\" type link.
 PATH is the DOI name.  DESC is the description of the link, or
 nil.  BACKEND is a symbol representing the backend used for
-export.  INFO is a a plist containing the export parameters."
+export.  INFO is a plist containing the export parameters."
   (let ((uri (concat org-link-doi-server-url path)))
     (pcase backend
       (`html

diff --git a/lisp/org/org-feed.el b/lisp/org/org-feed.el
index a5fea08882f39a4960b0b2eeb7235498b98ff728..c7b4bde0d28d86cf379c92f55ef57271ea1c2cab 100644 (file)
--- a/lisp/org/org-feed.el
+++ b/lisp/org/org-feed.el
@@ -406,7 +406,7 @@ it can be a list structured like an entry in `org-feed-alist'."
 
          ;; Write the new status
          ;; We do this only now, in case something goes wrong above, so
-         ;; that would would end up with a status that does not reflect
+          ;; that would end up with a status that does not reflect
          ;; which items truly have been handled
          (org-feed-write-status inbox-pos drawer status)
 

diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el
index 79ef6101e9bdfeeb0d0b53eac8371ffda33e3ef2..03beb065699b13fa09d014a9f0cde8ff7e8ce67a 100644 (file)
--- a/lisp/progmodes/gdb-mi.el
+++ b/lisp/progmodes/gdb-mi.el
@@ -2112,7 +2112,7 @@ is running."
            (not (null gdb-running-threads-count))
            (> gdb-running-threads-count 0))))
 
-;; GUD displays the selected GDB frame.  This might might not be the current
+;; GUD displays the selected GDB frame.  This might not be the current
 ;; GDB frame (after up, down etc).  If no GDB frame is visible but the last
 ;; visited breakpoint is, use that window.
 (defun gdb-display-source-buffer (buffer)

diff --git a/lisp/transient.el b/lisp/transient.el
index 06e41061925f0082c2fbd78e2f7fa1e2e0fe47f6..41b69b1abace152cf40ce33229f54d9677f258ab 100644 (file)
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -246,7 +246,7 @@ for infix argument are highlighted when only a long argument
 In the rare case that a short-hand is specified but does not
 match the key binding, then it is highlighed differently.
 
-The highlighting is done using using `transient-mismatched-key'
+The highlighting is done using `transient-mismatched-key'
 and `transient-nonstandard-key'."
   :package-version '(transient . "0.1.0")
   :group 'transient

diff --git a/src/lisp.h b/src/lisp.h
index 7a7d2e799792aad710ba40efb8515379ffbba54c..e4a49b8ef945983a160440fee1f7545c70ebe214 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -3451,7 +3451,7 @@ union specbinding
 #define WRAP_SPECPDL_REF 1
 #endif
 
-/* Abstract reference to to a specpdl entry.
+/* Abstract reference to a specpdl entry.
    The number is always a multiple of sizeof (union specbinding).  */
 #ifdef WRAP_SPECPDL_REF
 /* Use a proper type for specpdl_ref if it does not make the code slower,

diff --git a/test/lisp/cedet/semantic-utest-ia-resources/teststruct.cpp b/test/lisp/cedet/semantic-utest-ia-resources/teststruct.cpp
index e7d85101a1a6af433628a08a551b7353438c5ddd..f5b6d64184229e1b5f9119be6be0d1235c5aa6da 100644 (file)
--- a/test/lisp/cedet/semantic-utest-ia-resources/teststruct.cpp
+++ b/test/lisp/cedet/semantic-utest-ia-resources/teststruct.cpp
@@ -20,7 +20,7 @@
 // along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
 
 
-// Note: initially provided by by Alex Ott.
+// Note: initially provided by Alex Ott.
 
 template <typename DerivedT>
 struct grammar {