Spelling fixes.

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 "_?\"")

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

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)

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))))

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];