25 files changed, 32 insertions, 32 deletions

diff --git a/config.bat b/config.bat
index 758e4621386..e9a180c8eed 100644
--- a/config.bat
+++ b/config.bat
@@ -310,7 +310,7 @@ rm -f makefile.tmp
 sed -f ../msdos/sedlibcf.inp < gnulib.mk-in > gnulib.tmp

 sed -f ../msdos/sedlibmk.inp < gnulib.tmp > gnulib.mk

 rm -f gnulib.tmp

-Rem Create directorys in lib/ that MKDIR_P is supposed to create

+Rem Create directories in lib/ that MKDIR_P is supposed to create

 Rem but I have no idea how to do that on MS-DOS.

 mkdir sys

 Rem Create .d files for new files in lib/ and lib/malloc/

diff --git a/lisp/emacs-lisp/shortdoc.el b/lisp/emacs-lisp/shortdoc.el
index 340fe766c1e..4c8ca967f12 100644
--- a/lisp/emacs-lisp/shortdoc.el
+++ b/lisp/emacs-lisp/shortdoc.el
@@ -83,7 +83,7 @@ together:
 If EVAL is a string, it will be inserted as is, and then that
 string will be `read' and evaluated.
 
-2. Document a form or string, but manually document its evalation
+2. Document a form or string, but manually document its evaluation
    result.  The provided form will not be evaluated.
 
   (FUNC
diff --git a/lisp/eshell/esh-opt.el b/lisp/eshell/esh-opt.el
index 0961e214f4f..f52b70fe7a6 100644
--- a/lisp/eshell/esh-opt.el
+++ b/lisp/eshell/esh-opt.el
@@ -205,7 +205,7 @@ a long option."
 VALUE is the potential value of the OPT, coming from args like
 \"-fVALUE\" or \"--foo=VALUE\", or nil if no value was supplied.  If
 OPT doesn't consume a value, return VALUE unchanged so that it can be
-processed later; otherwsie, return nil.
+processed later; otherwise, return nil.
 
 If the OPT consumes an argument for its value and VALUE is nil, the
 argument list will be modified."
diff --git a/lisp/image/image-converter.el b/lisp/image/image-converter.el
index 7914d28c293..9440c623f90 100644
--- a/lisp/image/image-converter.el
+++ b/lisp/image/image-converter.el
@@ -49,7 +49,7 @@ formats that are to be supported: Only the suffixes that map to
 (defcustom image-convert-to-format "png"
   "The image format to convert to.
 This should be a string like \"png\" or \"ppm\" or some
-other (preferrably lossless) format that Emacs understands
+other (preferably lossless) format that Emacs understands
 natively.  The converter chosen has to support the format, and if
 not, conversion will fail."
   :group 'image
diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index 1596cdb4817..ab74c2cffd9 100644
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -310,7 +310,7 @@ Print messages at start and end of loading unless optional fourth
 arg NOMESSAGE is non-nil.
 
 If EVAL-FUNCTION, call that instead of calling `eval-buffer'
-directly.  It is called with two paramameters: The buffer object
+directly.  It is called with two parameters: The buffer object
 and the file name.
 
 Return t if file exists."
diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 57cb566c95d..21f6e33b0d2 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -1855,7 +1855,7 @@ The browser to used is specified by the
   (replace-regexp-in-string ".utm_.*" "" url))
 
 (defun eww--transform-url (url)
-  "Appy `eww-url-transformers'."
+  "Apply `eww-url-transformers'."
   (when url
     (dolist (func eww-url-transformers)
       (setq url (funcall func url)))
diff --git a/lisp/progmodes/cc-engine.el b/lisp/progmodes/cc-engine.el
index ae68bf989a7..2a9a7a8bf5e 100644
--- a/lisp/progmodes/cc-engine.el
+++ b/lisp/progmodes/cc-engine.el
@@ -6848,7 +6848,7 @@ comment at the start of cc-engine.el for more info."
   ;; checking `c-new-id-start' and `c-new-id-end'.  That's done to avoid
   ;; adding all prefixes of a type as it's being entered and font locked.
   ;; This is a bit rough and ready, but now covers adding characters into the
-  ;; middle of an identifer.
+  ;; middle of an identifier.
   ;;
   ;; This function might do hidden buffer changes.
   (if (and c-new-id-start c-new-id-end
diff --git a/lisp/progmodes/erts-mode.el b/lisp/progmodes/erts-mode.el
index 31a8bded8ad..1b88540ff38 100644
--- a/lisp/progmodes/erts-mode.el
+++ b/lisp/progmodes/erts-mode.el
@@ -51,17 +51,17 @@
      :foreground "blue")
     (t
      :bold t))
-  "Face used for displaying specificaton values."
+  "Face used for displaying specification values."
   :group 'erts-mode)
 
 (defface erts-mode-start-test
   '((t :inherit font-lock-keyword-face))
-  "Face used for displaying specificaton test start markers."
+  "Face used for displaying specification test start markers."
   :group 'erts-mode)
 
 (defface erts-mode-end-test
   '((t :inherit font-lock-comment-face))
-  "Face used for displaying specificaton test start markers."
+  "Face used for displaying specification test start markers."
   :group 'erts-mode)
 
 (defvar erts-mode-map
diff --git a/lisp/progmodes/sql.el b/lisp/progmodes/sql.el
index 979b743a65d..7bb4fef0c09 100644
--- a/lisp/progmodes/sql.el
+++ b/lisp/progmodes/sql.el
@@ -4179,7 +4179,7 @@ must tell Emacs.  Here's how to do that in your init file:
                      ;; start a comment.
                      (string-to-syntax ".")
                    ;; Inside a comment, ignore it to avoid -*/ not
-                   ;; being intepreted as a comment end.
+                   ;; being interpreted as a comment end.
                    (forward-char -1)
                    nil)))))
   ;; Set syntax and font-face highlighting
diff --git a/lisp/replace.el b/lisp/replace.el
index 81282deb140..3d0877a9a64 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -2684,7 +2684,7 @@ It is called with three arguments, as if it were
   "Function to convert the FROM string of query-replace commands to a regexp.
 This is used by `query-replace', `query-replace-regexp', etc. as
 the value of `isearch-regexp-function' when they search for the
-occurences of the string/regexp to be replaced.  This is intended
+occurrences of the string/regexp to be replaced.  This is intended
 to be used when the string to be replaced, as typed by the user,
 is not to be interpreted literally, but instead should be converted
 to a regexp that is actually used for the search.")
diff --git a/lisp/x-dnd.el b/lisp/x-dnd.el
index 13a73aa7fb3..f3abb9d5e6d 100644
--- a/lisp/x-dnd.el
+++ b/lisp/x-dnd.el
@@ -784,7 +784,7 @@ FORMAT is 32 (not used).  MESSAGE is the data part of an XClientMessageEvent."
 ;;; Handling drops.
 
 (defun x-dnd-handle-unsupported-drop (targets _x _y action _window-id _frame _time)
-  "Return non-nil if the drop described by TARGETS and ACTION should not proceeed."
+  "Return non-nil if the drop described by TARGETS and ACTION should not proceed."
   (not (and (or (eq action 'XdndActionCopy)
                 (eq action 'XdndActionMove))
             (or (member "STRING" targets)
diff --git a/lisp/xwidget.el b/lisp/xwidget.el
index 62da16d486a..88bc8ff6c5e 100644
--- a/lisp/xwidget.el
+++ b/lisp/xwidget.el
@@ -451,7 +451,7 @@ XWIDGET instance, XWIDGET-EVENT-TYPE depends on the originating xwidget."
                          xwidget-webkit--progress-update-timer
                          (run-at-time 0.5 0.5 #'xwidget-webkit--update-progress-timer-function
                                       xwidget)))))
-             ;; This funciton will be called multi times, so only
+             ;; This function will be called multi times, so only
              ;; change buffer name when the load actually completes
              ;; this can limit buffer-name flicker in mode-line.
              (when (or (string-equal (nth 3 last-input-event)
diff --git a/src/haiku_support.cc b/src/haiku_support.cc
index ac2f4f39ea0..2143f14dc97 100644
--- a/src/haiku_support.cc
+++ b/src/haiku_support.cc
@@ -143,7 +143,7 @@ struct font_selection_dialog_message
   /* Whether or not font selection was cancelled.  */
   bool_bf cancel : 1;
 
-  /* Whether or not a size was explictly specified.  */
+  /* Whether or not a size was explicitly specified.  */
   bool_bf size_specified : 1;
 
   /* The index of the selected font family.  */
diff --git a/src/haikuterm.c b/src/haikuterm.c
index 57f5b052f6d..df0cd82a39e 100644
--- a/src/haikuterm.c
+++ b/src/haikuterm.c
@@ -3036,7 +3036,7 @@ haiku_flush_dirty_back_buffer_on (struct frame *f)
     haiku_flip_buffers (f);
 }
 
-/* N.B. that support for TYPE must be explictly added to
+/* N.B. that support for TYPE must be explicitly added to
    haiku_read_socket.  */
 void
 haiku_wait_for_event (struct frame *f, int type)
diff --git a/src/image.c b/src/image.c
index dfa53279927..18e9e72d83c 100644
--- a/src/image.c
+++ b/src/image.c
@@ -9108,7 +9108,7 @@ gif_load (struct frame *f, struct image *img)
       goto gif_error;
     }
 
-  /* It's an animated image, so initalize the cache.  */
+  /* It's an animated image, so initialize the cache.  */
   if (cache && !cache->handle)
     {
       cache->handle = gif;
diff --git a/src/lread.c b/src/lread.c
index 2538851bac6..409e97cdfa6 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -3497,7 +3497,7 @@ read1 (Lisp_Object readcharfun, int *pch, bool first_in_list, bool locate_syms)
 
                           /* Optimisation: since the placeholder is already
                              a cons, repurpose it as the actual value.
-                             This allows us to skip the substition below,
+                             This allows us to skip the substitution below,
                              since the placeholder is already referenced
                              inside TEM at the appropriate places.  */
                           Fsetcar (placeholder, XCAR (tem));
diff --git a/src/pgtkfns.c b/src/pgtkfns.c
index a0fcf70f31b..1feb3fe250d 100644
--- a/src/pgtkfns.c
+++ b/src/pgtkfns.c
@@ -848,7 +848,7 @@ pgtk_set_scroll_bar_background (struct frame *f, Lisp_Object new_value,
         error ("Unknown color.");
 
       /* On pgtk, this frame parameter should be ignored, and honor
-         gtk theme.  (It honors the GTK theme if not explictly set, so
+         gtk theme.  (It honors the GTK theme if not explicitly set, so
          I see no harm in letting users tinker a bit more.)  */
       char css[64];
       sprintf (css, "scrollbar trough { background-color: #%06x; }",
@@ -2853,7 +2853,7 @@ x_create_tip_frame (struct pgtk_display_info *dpyinfo, Lisp_Object parms, struct
      Frame parameters may be changed if .Xdefaults contains
      specifications for the default font.  For example, if there is an
      `Emacs.default.attributeBackground: pink', the `background-color'
-     attribute of the frame get's set, which let's the internal border
+     attribute of the frame gets set, which lets the internal border
      of the tooltip frame appear in pink.  Prevent this.  */
   {
     Lisp_Object bg = Fframe_parameter (frame, Qbackground_color);
diff --git a/src/pgtkterm.c b/src/pgtkterm.c
index 11ab40a0d39..b9d0b7b512e 100644
--- a/src/pgtkterm.c
+++ b/src/pgtkterm.c
@@ -2551,7 +2551,7 @@ pgtk_draw_glyph_string (struct glyph_string *s)
                     }
 
                   /* Ignore minimum_offset if the amount of pixels was
-                     explictly specified.  */
+                     explicitly specified.  */
                   if (!s->face->underline_pixels_above_descent_line)
                     position = max (position, underline_minimum_offset);
                 }
diff --git a/src/pgtkterm.h b/src/pgtkterm.h
index 20c161e63b9..e31e62ae193 100644
--- a/src/pgtkterm.h
+++ b/src/pgtkterm.h
@@ -96,7 +96,7 @@ struct scroll_bar
      editing large files, we establish a minimum height by always
      drawing handle bottoms VERTICAL_SCROLL_BAR_MIN_HANDLE pixels below
      where they would be normally; the bottom and top are in a
-     different co-ordinate system.  */
+     different coordinate system.  */
   int start, end;
 
   /* If the scroll bar handle is currently being dragged by the user,
diff --git a/src/sort.c b/src/sort.c
index c7ccfc23055..d10ae692d33 100644
--- a/src/sort.c
+++ b/src/sort.c
@@ -783,7 +783,7 @@ merge_at (merge_state *ms, const ptrdiff_t i)
 }
 
 
-/* Compute the "power" of the first of two adjacent runs begining at
+/* Compute the "power" of the first of two adjacent runs beginning at
    index S1, with the first having length N1 and the second (starting
    at index S1+N1) having length N2.  The run has total length N.  */
 
diff --git a/src/w32term.c b/src/w32term.c
index 19786da3a6d..da7ac379723 100644
--- a/src/w32term.c
+++ b/src/w32term.c
@@ -2720,7 +2720,7 @@ w32_draw_glyph_string (struct glyph_string *s)
 
                   if (!(s->face->underline_at_descent_line_p
                         /* Ignore minimum_offset if the amount of pixels
-                           was explictly specified.  */
+                           was explicitly specified.  */
                         && s->face->underline_pixels_above_descent_line))
                     position = max (position, minimum_offset);
                 }
diff --git a/src/xterm.c b/src/xterm.c
index bb92e1bbe66..21c31271ca5 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -78,7 +78,7 @@ along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.  */
    INPUT FOCUS
 
    Under X, the window where keyboard input is sent is not always
-   explictly defined.  When there is a focus window, it receives what
+   explicitly defined.  When there is a focus window, it receives what
    is referred to as "explicit focus", but when there is none, it
    receives "implicit focus" whenever the pointer enters it, and loses
    that focus when the pointer leaves.  When the toplevel window of a
@@ -2515,7 +2515,7 @@ x_dnd_compute_toplevels (struct x_display_info *dpyinfo)
             }
 
           /* And the common case where there is no input rect and the
-             bouding rect equals the window dimensions.  */
+             bounding rect equals the window dimensions.  */
 
           if (tem->n_input_rects == -1
               && tem->n_bounding_rects == 1
@@ -8781,7 +8781,7 @@ x_draw_glyph_string (struct glyph_string *s)
                     }
 
                   /* Ignore minimum_offset if the amount of pixels was
-                     explictly specified.  */
+                     explicitly specified.  */
                   if (!s->face->underline_pixels_above_descent_line)
                     position = max (position, minimum_offset);
                 }
@@ -19973,7 +19973,7 @@ handle_one_xevent (struct x_display_info *dpyinfo,
                     }
 
                   /* And the common case where there is no input rect and the
-                     bouding rect equals the window dimensions.  */
+                     bounding rect equals the window dimensions.  */
 
                   if (tem->n_input_rects == -1
                       && tem->n_bounding_rects == 1
diff --git a/test/lisp/ansi-color-tests.el b/test/lisp/ansi-color-tests.el
index 2ff7fc6aaf6..1b04e8e9def 100644
--- a/test/lisp/ansi-color-tests.el
+++ b/test/lisp/ansi-color-tests.el
@@ -173,7 +173,7 @@ strings with `eq', this function compares them with `equal'."
       (should (ansi-color-tests-equal-props
                propertized-str (buffer-string))))
 
-    ;; \e not followed by '[' and invalid ANSI escape seqences
+    ;; \e not followed by '[' and invalid ANSI escape sequences
     (dolist (fun (list ansi-filt ansi-app))
       (with-temp-buffer
         (should (equal (funcall fun "\e") ""))
diff --git a/test/lisp/files-tests.el b/test/lisp/files-tests.el
index 7d17fbde672..978f96912fb 100644
--- a/test/lisp/files-tests.el
+++ b/test/lisp/files-tests.el
@@ -1691,7 +1691,7 @@ FN-TEST is the function to test: either `save-some-buffers' or
 specified inside ARGS-RESULTS.
 
 During the call to FN-TEST,`read-event' is overridden with a function that
-just returns `n' and `kill-emacs' is overriden to do nothing.
+just returns `n' and `kill-emacs' is overridden to do nothing.
 
 ARGS-RESULTS is a list of elements (FN-ARGS CALLERS-DIR EXPECTED), where
 FN-ARGS are the arguments for FN-TEST;
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index fa5a614fbf4..d9c5df17908 100644
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -6461,7 +6461,7 @@ This requires restrictions of file name syntax."
 
 (defun tramp--test-asynchronous-processes-p ()
   "Whether asynchronous processes tests are run.
-This is used in tests which we dont't want to tag
+This is used in tests which we don't want to tag
 `:tramp-asynchronous-processes' completely."
   (and
    (ert-select-tests
@@ -6484,7 +6484,7 @@ This does not support some special file names."
 
 (defun tramp--test-expensive-test-p ()
   "Whether expensive tests are run.
-This is used in tests which we dont't want to tag `:expensive'
+This is used in tests which we don't want to tag `:expensive'
 completely."
   (ert-select-tests
    (ert--stats-selector ert--current-run-stats)