; Fix typos

ChangeLog.3

@@ -1654,7 +1654,7 @@
 	This reverts commit 78f76fe16e2737b40694f82af28d17a90a21ed7b.
 
 	The commit made calls to cl-concatenate bug out, since
-	autoloading defalises doesn't work very well (bug#54901).
+	autoloading defaliases doesn't work very well (bug#54901).
 
 2022-04-12  Eli Zaretskii  <eliz@gnu.org>
 

lisp/ChangeLog.15

@@ -10320,7 +10320,7 @@
 	* bs.el, expand.el, ido.el, image-dired.el, lpr.el, pcomplete.el,
 	* skeleton.el, term.el, time.el, wid-edit.el, woman.el,
 	* calc/calc-graph.el, calc/calc-help.el, calc/calc-incom.el,
-	* calc/calc.el, emacs-lisp/cl-extra.el, emacs-lips/cl-loaddefs.el,
+	* calc/calc.el, emacs-lisp/cl-extra.el, emacs-lisp/cl-loaddefs.el,
 	* emulation/cua-rect.el, emulation/viper-ex.el, eshell/esh-test.el,
 	* eshell/eshell.el, gnus/gnus-uu.el, gnus/nndoc.el, gnus/nnrss.el,
 	* gnus/rfc2047.el, gnus/utf7.el, international/utf-7.el,

lisp/emacs-lisp/cl-extra.el

@@ -552,7 +552,7 @@ too large if positive or too small if negative)."
 			,new)))))
   (seq-subseq seq start end))
 
-;;; This isn't a defalias because autoloading defalises doesn't work
+;;; This isn't a defalias because autoloading defaliases doesn't work
 ;;; very well.
 
 ;;;###autoload

lisp/treesit.el

@@ -1685,7 +1685,7 @@ the current line if the beginning of the defun is indented."
 
 Return a list of (PREV NEXT PARENT), where PREV and NEXT are
 previous and next sibling defuns around POS, and PARENT is the
-parent defun surrouding POS.  All of three could be nil if no
+parent defun surrounding POS.  All of three could be nil if no
 sound defun exists.
 
 REGEXP and PRED are the same as in `treesit-defun-type-regexp'."
@@ -1767,7 +1767,7 @@ If ARG is positive, move forward that many steps, if negative,
 move backward.  If SIDE is `beg', stop at the beginning of a
 defun, if SIDE is `end', stop at the end.
 
-This function doesn't actaully move point, it just returns the
+This function doesn't actually move point, it just returns the
 position it would move to.  If there aren't enough defuns to move
 across, return nil.
 

src/xfaces.c

@@ -7443,7 +7443,7 @@ If the value is nil, candidate fonts might be rejected if the don't
 have exactly the same values of attributes as the face requests.
 
 This variable exists for debugging of the font-selection process,
-and we advise not to change it othersie.  */);
+and we advise not to change it otherwise.  */);
   Vface_font_lax_matched_attributes = Qt;
 
 #ifdef HAVE_WINDOW_SYSTEM

test/lisp/progmodes/eglot-tests.el

@@ -329,7 +329,7 @@ Pass TIMEOUT to `eglot--with-timeout'."
        (should-error (eglot--current-server-or-lose))))))
 
 (ert-deftest auto-detect-running-server ()
-  "Visit a file and \\[eglot], then visit a neighbour."
+  "Visit a file and \\[eglot], then visit a neighbor."
   (skip-unless (executable-find "clangd"))
   (eglot-tests--auto-detect-running-server-1))
 
@@ -704,7 +704,7 @@ pylsp prefers autopep over yafp, despite its README stating the contrary."
        (string= (buffer-string) "def a():\n    pass\n\n\ndef b():\n    pass\n")))))
 
 (ert-deftest rust-on-type-formatting ()
-  "Test textDocument/onTypeFormatting agains rust-analyzer."
+  "Test textDocument/onTypeFormatting against rust-analyzer."
   (skip-unless (executable-find "rust-analyzer"))
   (skip-unless (executable-find "cargo"))
   (eglot--with-fixture

test/src/treesit-tests.el

@@ -611,7 +611,7 @@ visible_end.)"
 ;;
 ;; I've setup a framework for easier testing of defun navigation.
 ;;
-;; To use it for a particular langauge, first write a test program
+;; To use it for a particular language, first write a test program
 ;; similar to `treesit--ert-defun-navigation-python-program', and
 ;; insert markers.  Markers that marks BOLs are defined as follows:
 ;;
@@ -661,7 +661,7 @@ marking's number, and POS is each marking's position."
     (nreverse result)))
 
 (defun treesit--ert-collect-positions (positions functions)
-  "Collect posifions after caling each function in FUNCTIONS.
+  "Collect positions after calling each function in FUNCTIONS.
 
 POSITIONS should be a list of buffer positions, FUNCTIONS should
 be a list of functions.  This function collects the return value
@@ -710,7 +710,7 @@ and \"]\"."
            ;; Collect positions each function returns.
            (positions
             (treesit--ert-collect-positions
-             ;; The first columnn of DECODED-MASTER.
+             ;; The first column of DECODED-MASTER.
              (mapcar #'car decoded-master)
              ;; Four functions: next-end, prev-beg, next-beg, prev-end.
              (mapcar (lambda (conf)