Spelling fixes.

5 files changed, 7 insertions, 6 deletions

diff --git a/lisp/progmodes/cc-awk.el b/lisp/progmodes/cc-awk.el
index 0711bc983e8..4b3fc91b0ff 100644
--- a/lisp/progmodes/cc-awk.el
+++ b/lisp/progmodes/cc-awk.el
@@ -142,7 +142,7 @@
 
 (defconst c-awk-harmless-line-char-re "[^_#/\"\\\\\n\r]")
 ;;   Matches any character but a _, #, /, ", \, or newline.  N.B. _" starts a
-;; localisation string in gawk 3.1
+;; localization string in gawk 3.1
 (defconst c-awk-harmless-line-string*-re
   (concat "\\(" c-awk-harmless-line-char-re "\\|" c-awk-esc-pair-re "\\|" c-awk-harmless-_ "\\)*"))
 ;;   Matches a (possibly empty) sequence of chars without unescaped /, ", \,
@@ -795,7 +795,8 @@
       (setq anchor (point))
       (search-forward-regexp c-awk-harmless-string*-here-re nil t)
       ;; We are now looking at either a " or a / or a brace/paren/semicolon.
-      ;; Do our thing on the string, regexp or divsion sign or update our state.
+      ;; Do our thing on the string, regexp or division sign or update
+      ;; our state.
       (setq anchor-state-/div
             (cond
              ((looking-at "_?\"")
diff --git a/lisp/progmodes/make-mode.el b/lisp/progmodes/make-mode.el
index 60807f10742..20673866bc4 100644
--- a/lisp/progmodes/make-mode.el
+++ b/lisp/progmodes/make-mode.el
@@ -1304,7 +1304,7 @@ Fill comments, backslashed lines, and variable definitions specially."
         (save-restriction
           (narrow-to-region beginning end)
           (makefile-backslash-region (point-min) (point-max) t)
-          ;; Backslashed newlines are marked as puncutations, so when
+          ;; Backslashed newlines are marked as punctuation, so when
           ;; fill-delete-newlines turns the LF into SPC, we end up with spaces
           ;; which back-to-indentation (called via fill-newline ->
           ;; fill-indent-to-left-margin -> indent-line-to) thinks are real code
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index 2cb108cc316..35c5ba19e33 100644
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -2334,7 +2334,7 @@ Argument OUTPUT is a string with the output from the comint process."
               ;; encounters an exception, it prints the _entire_ stack
               ;; trace.  To handle all of these cases, we want to find
               ;; the _last_ stack frame printed in the most recent
-              ;; batch of output, then jump to the corrsponding
+              ;; batch of output, then jump to the corresponding
               ;; file/line number.
               (goto-char (point-max))
               (when (re-search-backward python-pdbtrack-stacktrace-info-regexp nil t)
diff --git a/lisp/simple.el b/lisp/simple.el
index 3481a736648..d7541f68778 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -802,7 +802,7 @@ other words, it will work just like `just-one-space' command."
               (unless (= start end)
                 (cons orig-pos (buffer-substring start (point)))))
         ;; If this run causes no change in buffer content, delete all spaces,
-        ;; otherwise delete all excees spaces.
+        ;; otherwise delete all excess spaces.
         (delete-region (if (and (not single-shot) (zerop n) (= mid end))
                            start mid) end)
         (insert (make-string n ?\s))))
diff --git a/src/w32.c b/src/w32.c
index 64f8a0335ac..64e989a3b36 100644
--- a/src/w32.c
+++ b/src/w32.c
@@ -4280,7 +4280,7 @@ fstatat (int fd, char const *name, struct stat *st, int flags)
   /* Rely on a hack: an open directory is modeled as file descriptor 0.
      This is good enough for the current usage in Emacs, but is fragile.
 
-     FIXME: Add proper support for fdopendir, fstatatat, readlinkat.
+     FIXME: Add proper support for fdopendir, fstatat, readlinkat.
      Gnulib does this and can serve as a model.  */
   char fullname[MAX_PATH];