Spelling fixes.

42 files changed, 50 insertions, 50 deletions

diff --git a/lisp/ChangeLog.13 b/lisp/ChangeLog.13
index 558718a5a5f..a2d274fbcc0 100644
--- a/lisp/ChangeLog.13
+++ b/lisp/ChangeLog.13
@@ -1121,10 +1121,10 @@
         * international/titdic-cnv.el (tit-process-header): Fix embedded
         coding tag.
         (titdic-convert): Bind coding-system-for-write to the coding
-        system specfied in the map file.  Remove `charset' property after
+        system specified in the map file.  Remove `charset' property after
         decoding.
         (miscdic-convert): Bind coding-system-for-write to the coding
-        system specfied for the map file.  Fix LANGUAGE arg to
+        system specified for the map file.  Fix LANGUAGE arg to
         quail-define-package.
         (batch-miscdic-convert): Check if a file is directory or not.
 
diff --git a/lisp/ChangeLog.15 b/lisp/ChangeLog.15
index 6e13c1156ce..8d369f2e2f0 100644
--- a/lisp/ChangeLog.15
+++ b/lisp/ChangeLog.15
@@ -17621,7 +17621,7 @@
         (batch-update-autoloads): Handle autoload-excludes on windows-nt.
 
         * mail/rmailedit.el (rmail-cease-edit): Give an error if the end of
-        the headers cannot be located.  Simplify, subtracting superflous
+        the headers cannot be located.  Simplify, subtracting superfluous
         save-excursions.
 
 2009-10-15  Stefan Monnier  <monnier@iro.umontreal.ca>
diff --git a/lisp/ChangeLog.9 b/lisp/ChangeLog.9
index 252b3854f7a..ba90274edf0 100644
--- a/lisp/ChangeLog.9
+++ b/lisp/ChangeLog.9
@@ -13936,7 +13936,7 @@
 
         * international/mule-cmds.el (help-xref-mule-regexp-template): New
         variable.
-        (describe-input-method): Temporarily activate the specfied input
+        (describe-input-method): Temporarily activate the specified input
         method to display the information.
         (describe-language-environment): Hyperlinks to mule related items.
 
diff --git a/lisp/cedet/semantic/mru-bookmark.el b/lisp/cedet/semantic/mru-bookmark.el
index 47915e8ad58..6f2b2a8b9c8 100644
--- a/lisp/cedet/semantic/mru-bookmark.el
+++ b/lisp/cedet/semantic/mru-bookmark.el
@@ -363,7 +363,7 @@ Argument PROMPT is the prompt to use when reading."
       (setq ans (assoc ans alist))
       (if ans
           (cdr ans)
-        ;; no match.  Custom word.  Look it up somwhere?
+        ;; no match.  Custom word.  Look it up somewhere?
         nil)
       )))
 
diff --git a/lisp/cedet/srecode/document.el b/lisp/cedet/srecode/document.el
index e25905ead83..038719fbcff 100644
--- a/lisp/cedet/srecode/document.el
+++ b/lisp/cedet/srecode/document.el
@@ -167,7 +167,7 @@ doesn't always work correctly."
     ("str\\(ing\\)?" . "string")
     ("use?r" . "user")
     ("num\\(ber\\)?" . "number")
-    ("\\(^\\|\\s-\\)id\\($\\|\\s-\\)" . "Identifier") ;complex cause ;common sylable
+    ("\\(^\\|\\s-\\)id\\($\\|\\s-\\)" . "Identifier") ;complex cause ;common syllable
     )
   "List of common English abbreviations or full words.
 These are nouns (as opposed to verbs) for use in creating expanded
diff --git a/lisp/emacs-lisp/authors.el b/lisp/emacs-lisp/authors.el
index 596b32f24c3..f5330b3b65f 100644
--- a/lisp/emacs-lisp/authors.el
+++ b/lisp/emacs-lisp/authors.el
@@ -452,7 +452,7 @@ Changes to files in this list are not listed.")
     ("William Sommerfeld" :wrote "emacsclient.c" "scribe.el")
     ;; No longer distributed: emacsserver.c.
     ("Leigh Stoller" :changed "emacsclient.c" "server.el")
-    ("Steve Strassman" :wrote "spook.el")
+    ("Steve Strassmann" :wrote "spook.el")
     ("Shinichirou Sugou" :changed "etags.c")
     ;; No longer distributed: emacsserver.c.
     ("Sun Microsystems, Inc" :changed "emacsclient.c" "server.el"
diff --git a/lisp/emacs-lisp/crm.el b/lisp/emacs-lisp/crm.el
index 3848ab7e6ea..d76490f37b8 100644
--- a/lisp/emacs-lisp/crm.el
+++ b/lisp/emacs-lisp/crm.el
@@ -143,7 +143,7 @@ nil if none.
 
 The value of FLAG is used to specify the type of completion operation.
 A value of nil specifies `try-completion'.  A value of t specifies
-`all-completions'.  A value of lambda specifes a test for an exact match.
+`all-completions'.  A value of lambda specifies a test for an exact match.
 
 For more information on STRING, PREDICATE, and FLAG, see the Elisp
 Reference sections on 'Programmed Completion' and 'Basic Completion
diff --git a/lisp/emacs-lisp/pcase.el b/lisp/emacs-lisp/pcase.el
index 6931ce75cb5..7709b59d137 100644
--- a/lisp/emacs-lisp/pcase.el
+++ b/lisp/emacs-lisp/pcase.el
@@ -685,7 +685,7 @@ Otherwise, it defers to REST which is a list of branches of the form
       (pcase--if `(,(if (stringp qpat) #'equal #'eq) ,sym ',qpat)
                  (pcase--u1 matches code vars then-rest)
                  (pcase--u else-rest))))
-   (t (error "Unkown QPattern %s" qpat))))
+   (t (error "Unknown QPattern %s" qpat))))
 
 
 (provide 'pcase)
diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el
index b17fa6b1471..5e107da15fc 100644
--- a/lisp/emulation/cua-base.el
+++ b/lisp/emulation/cua-base.el
@@ -84,7 +84,7 @@
 
 ;; If you have just replaced a highlighted region with typed text,
 ;; you can repeat the replace with M-v.  This will search forward
-;; for a streach of text identical to the previous contents of the
+;; for a stretch of text identical to the previous contents of the
 ;; region (i.e. the contents of register 0) and replace it with the
 ;; text you typed to replace the original region.  Repeating M-v will
 ;; replace the next matching region and so on.
diff --git a/lisp/emulation/viper-cmd.el b/lisp/emulation/viper-cmd.el
index b6d487704f4..4c728b5de71 100644
--- a/lisp/emulation/viper-cmd.el
+++ b/lisp/emulation/viper-cmd.el
@@ -4397,7 +4397,7 @@ cursor move past the beginning of line."
 
 (defun viper-query-replace ()
   "Query replace.
-If a null string is suplied as the string to be replaced,
+If a null string is supplied as the string to be replaced,
 the query replace mode will toggle between string replace
 and regexp replace."
   (interactive)
diff --git a/lisp/erc/ChangeLog.02 b/lisp/erc/ChangeLog.02
index d20b6ca35a7..85914a72ae9 100644
--- a/lisp/erc/ChangeLog.02
+++ b/lisp/erc/ChangeLog.02
@@ -51,7 +51,7 @@
 2002-12-29  Damien Elmes  <erc@repose.cx>
 
         * erc-track.el:
-        * (erc-track-get-active-buffer): remove superflous (+ arg 0)
+        * (erc-track-get-active-buffer): remove superfluous (+ arg 0)
 
 2002-12-29  Alex Schroeder  <alex@gnu.org>
 
diff --git a/lisp/erc/ChangeLog.04 b/lisp/erc/ChangeLog.04
index ff47372b8e3..97d2f01a22d 100644
--- a/lisp/erc/ChangeLog.04
+++ b/lisp/erc/ChangeLog.04
@@ -1926,7 +1926,7 @@
 
         * erc.el: erc-send-whitespace-lines: New variable.
         (erc-send-current-line): Use erc-send-whitespace-lines.  Also,
-        removed superflous test for empty line in the mapc, since the
+        removed superfluous test for empty line in the mapc, since the
         blank line test should find all.  I do like to be able to send an
         empty line when i want to!
         (erc-send-current-line): Check for point being in input line
@@ -2092,4 +2092,3 @@ See ChangeLog.03 for earlier changes.
 ;; Local Variables:
 ;; coding: utf-8
 ;; End:
-
diff --git a/lisp/fringe.el b/lisp/fringe.el
index fa5ebb6f0c6..aac7e3ba5c7 100644
--- a/lisp/fringe.el
+++ b/lisp/fringe.el
@@ -30,7 +30,7 @@
 
 ;; The code is influenced by scroll-bar.el and avoid.el.  The author
 ;; gratefully acknowledge comments and suggestions made by Miles
-;; Bader, Eli Zaretski, Richard Stallman, Pavel Janík and others which
+;; Bader, Eli Zaretskii, Richard Stallman, Pavel Janík and others which
 ;; improved this package.
 
 ;;; Code:
diff --git a/lisp/gnus/ChangeLog.2 b/lisp/gnus/ChangeLog.2
index 64b15ce31b3..e47af13275e 100644
--- a/lisp/gnus/ChangeLog.2
+++ b/lisp/gnus/ChangeLog.2
@@ -970,9 +970,9 @@
         * pgg-gpg.el (pgg-gpg-possibly-cache-passphrase): New optional
         parameter key, overrides the key id used to store passphrase
         under (uses true key id from gpg output if nil).
-        (pgg-gpg-encrypt-region): Search for passphrase using user suplied
+        (pgg-gpg-encrypt-region): Search for passphrase using user supplied
         string STR, instead of (pgg-lookup-key STR t).
-        (pgg-gpg-encrypt-region): Store passphrase under user suplied
+        (pgg-gpg-encrypt-region): Store passphrase under user supplied
         string, instead of real key id taken from gpg output.
         (pgg-gpg-decrypt-region): Likewise.
         (pgg-gpg-sign-region): Likewise.
diff --git a/lisp/gnus/gnus-cus.el b/lisp/gnus/gnus-cus.el
index 98f04263571..0721445b592 100644
--- a/lisp/gnus/gnus-cus.el
+++ b/lisp/gnus/gnus-cus.el
@@ -922,7 +922,7 @@ will add a new `thread' match for each article that has X in its
 `Message-ID's of these matching articles.)  This will ensure that you
 can raise/lower the score of an entire thread, even though some
 articles in the thread may not have complete `References' headers.
-Note that using this may lead to undeterministic scores of the
+Note that using this may lead to nondeterministic scores of the
 articles in the thread.
 ")
                                      ,@types)
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index d8db300efbd..52c814528a5 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -4257,7 +4257,7 @@ If NO-DISPLAY, don't generate a summary buffer."
     result))
 
 (defun gnus-sort-gathered-threads (threads)
-  "Sort subtreads inside each gathered thread by `gnus-sort-gathered-threads-function'."
+  "Sort subthreads inside each gathered thread by `gnus-sort-gathered-threads-function'."
   (let ((result threads))
     (while threads
       (when (stringp (caar threads))
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 5198618c2c3..01fc02cd130 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -6169,7 +6169,7 @@ If the current line has `message-yank-prefix', insert it on the new line."
 When sending via news, also check that the REFERENCES are less
 than 988 characters long, and if they are not, trim them until
 they are."
-  ;; 21 is the number suggested by USEAGE.
+  ;; 21 is the number suggested by USAGE.
   (let ((maxcount 21)
         (count 0)
         (cut 2)
diff --git a/lisp/gnus/nnmairix.el b/lisp/gnus/nnmairix.el
index 4ad9d11f906..771e192c188 100644
--- a/lisp/gnus/nnmairix.el
+++ b/lisp/gnus/nnmairix.el
@@ -483,7 +483,7 @@ Other back ends might or might not work.")
                mfolder query threads)))
       ;; Check return value
       (cond
-       ((zerop rval)                    ; call was succesful
+       ((zerop rval)                    ; call was successful
         (nnmairix-call-backend
          "open-server" nnmairix-backend-server)
         ;; If we're dealing with nnml, rename files
diff --git a/lisp/language/hanja-util.el b/lisp/language/hanja-util.el
index bd661083406..adb25c7e2e8 100644
--- a/lisp/language/hanja-util.el
+++ b/lisp/language/hanja-util.el
@@ -6438,7 +6438,7 @@ character.  This variable is initialized by `hanja-init-load'.")
 
 ;; List of current conversion status.
 ;; The first element is the strating position of shown list.
-;; It is a group number each splited by `hanja-list-width'.
+;; It is a group number each split by `hanja-list-width'.
 ;; The second element is the position of selected element.
 ;; The third element is a list of suitable Hanja candidate.
 (defvar hanja-conversions
diff --git a/lisp/mail/uudecode.el b/lisp/mail/uudecode.el
index 8652e67d3e1..e2630b5102c 100644
--- a/lisp/mail/uudecode.el
+++ b/lisp/mail/uudecode.el
@@ -197,10 +197,10 @@ If FILE-NAME is non-nil, save the result to FILE-NAME."
           (cond
            (done)
            ((> 0 remain)
-            (error "uucode line ends unexpectly")
+            (error "uucode line ends unexpectedly")
             (setq done t))
            ((and (= (point) end) (not done))
-            ;;(error "uucode ends unexpectly")
+            ;;(error "uucode ends unexpectedly")
             (setq done t))
            ((= counter 3)
             (setq result (cons
diff --git a/lisp/mh-e/mh-e.el b/lisp/mh-e/mh-e.el
index 9d0ece0f505..ffcc3488664 100644
--- a/lisp/mh-e/mh-e.el
+++ b/lisp/mh-e/mh-e.el
@@ -2508,7 +2508,7 @@ of citations entirely, choose \"None\"."
     "Seal-Send-Time:"
     "See-Also:"                         ; H. Spencer: News Article Format and Transmission, June 1994
     "Sensitivity:"                      ; RFC 2156, 2421
-    "Speach-Act:"                       ; http://people.dsv.su.se/~jpalme/ietf/mail-headers/
+    "Speech-Act:"                       ; http://people.dsv.su.se/~jpalme/ietf/mail-headers/
     "Status:"                           ; sendmail
     "Supersedes:"                       ; H. Spencer: News Article Format and Transmission, June 1994
     "Telefax:"                          ; http://people.dsv.su.se/~jpalme/ietf/mail-headers/
diff --git a/lisp/mh-e/mh-letter.el b/lisp/mh-e/mh-letter.el
index f269faf3a51..b526df25cc7 100644
--- a/lisp/mh-e/mh-letter.el
+++ b/lisp/mh-e/mh-letter.el
@@ -909,7 +909,7 @@ Any match found replaces the text from BEGIN to END."
                (with-output-to-temp-buffer completions-buffer
                  (mh-display-completion-list
                   (all-completions word choices)
-                  ;; The `common-subtring' arg only works if it's a prefix.
+                  ;; The `common-substring' arg only works if it's a prefix.
                   (unless (and (functionp choices)
                                (let ((bounds
                                       (funcall choices
diff --git a/lisp/mouse.el b/lisp/mouse.el
index 615062dc031..d1aba96ff16 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -62,7 +62,7 @@ typically sets point where you click the mouse).
 If value is an integer, the time elapsed between pressing and
 releasing the mouse button determines whether to follow the link
 or perform the normal Mouse-1 action (typically set point).
-The absolute numeric value specifices the maximum duration of a
+The absolute numeric value specifies the maximum duration of a
 \"short click\" in milliseconds.  A positive value means that a
 short click follows the link, and a longer click performs the
 normal action.  A negative value gives the opposite behavior.
diff --git a/lisp/mpc.el b/lisp/mpc.el
index 224131623f4..617ec8bd80d 100644
--- a/lisp/mpc.el
+++ b/lisp/mpc.el
@@ -2412,7 +2412,7 @@ This is used so that they can be compared with `eq', which is needed for
     (let* (songid       ;The ID of the currently ffwd/rewinding song.
            songduration ;The duration of that song.
            songtime     ;The time of the song last time we ran.
-           oldtime      ;The timeoftheday last time we ran.
+           oldtime      ;The time of day last time we ran.
            prevsongid)  ;The song we're in the process leaving.
       (let ((fun
              (lambda ()
diff --git a/lisp/net/socks.el b/lisp/net/socks.el
index d792077d861..ac8ec15929b 100644
--- a/lisp/net/socks.el
+++ b/lisp/net/socks.el
@@ -414,7 +414,7 @@ version.")
                ((= atype socks-address-type-name)
                 (format "%c%s" (length address) address))
                (t
-                (error "Unkown address type: %d" atype))))
+                (error "Unknown address type: %d" atype))))
         (info (gethash proc socks-connections))
         request version)
     (or info (error "socks-send-command called on non-SOCKS connection %S"
diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el
index 27dff3aa8d9..abebed6115f 100644
--- a/lisp/net/tramp-gvfs.el
+++ b/lisp/net/tramp-gvfs.el
@@ -1209,7 +1209,7 @@ connection if a previous connection has died for some reason."
               (format "Opening connection for %s using %s" host method)
             (format "Opening connection for %s@%s using %s" user host method))
 
-        ;; Enable auth-sorce and password-cache.
+        ;; Enable auth-source and password-cache.
         (tramp-set-connection-property vec "first-password-request" t)
 
         ;; There will be a callback of "askPassword" when a password is
diff --git a/lisp/net/tramp-smb.el b/lisp/net/tramp-smb.el
index 73b9339e25a..c062ebbbfd2 100644
--- a/lisp/net/tramp-smb.el
+++ b/lisp/net/tramp-smb.el
@@ -973,7 +973,7 @@ If VEC has no cifs capabilities, exchange \"/\" by \"\\\\\"."
       (setq
        localname
        (if (string-match "^/?[^/]+\\(/.*\\)" localname)
-           ;; There is a share, sparated by "/".
+           ;; There is a share, separated by "/".
            (if (not (tramp-smb-get-cifs-capabilities vec))
                (mapconcat
                 (lambda (x) (if (equal x ?/) "\\" (char-to-string x)))
diff --git a/lisp/org/ob-screen.el b/lisp/org/ob-screen.el
index 084beffd229..367d73f787a 100644
--- a/lisp/org/ob-screen.el
+++ b/lisp/org/ob-screen.el
@@ -38,7 +38,7 @@
 (require 'ob-ref)
 
 (defvar org-babel-screen-location "screen"
-  "The command location for screen. 
+  "The command location for screen.
 In case you want to use a different screen than one selected by your $PATH")
 
 (defvar org-babel-default-header-args:screen
@@ -112,7 +112,7 @@ In case you want to use a different screen than one selected by your $PATH")
     (with-temp-file tmpfile
       (insert body)
 
-      ;; org-babel has superflous spaces
+      ;; org-babel has superfluous spaces
       (goto-char (point-min))
       (delete-matching-lines "^ +$"))
     tmpfile))
diff --git a/lisp/org/org-table.el b/lisp/org/org-table.el
index 76e4eae4b45..cf28a5e80ae 100644
--- a/lisp/org/org-table.el
+++ b/lisp/org/org-table.el
@@ -2989,7 +2989,7 @@ them to individual field equations for each field."
 So @< and $< will always be replaced with @1 and $1, respectively.
 The advantage of these special markers are that structure editing of
 the table will not change them, while @1 and $1 will be modified
-when a line/row is swaped out of that privileged position.  So for
+when a line/row is swapped out of that privileged position.  So for
 formulas that use a range of rows or columns, it may often be better
 to anchor the formula with \"I\" row markers, or to offset from the
 borders of the table using the @< @> $< $> makers."
diff --git a/lisp/play/cookie1.el b/lisp/play/cookie1.el
index 837213665fc..acd3aa8c2cb 100644
--- a/lisp/play/cookie1.el
+++ b/lisp/play/cookie1.el
@@ -46,7 +46,7 @@
 ;; In order to achieve total compatibility with strfile(1), cookie files
 ;; should start with two consecutive delimiters (and no comment).
 ;;
-;; This code derives from Steve Strassman's 1987 spook.el package, but
+;; This code derives from Steve Strassmann's 1987 spook.el package, but
 ;; has been generalized so that it supports multiple simultaneous
 ;; cookie databases and fortune files.  It is intended to be called
 ;; from other packages such as yow.el and spook.el.
diff --git a/lisp/progmodes/ada-xref.el b/lisp/progmodes/ada-xref.el
index f30457992a3..9c53b1a9e23 100644
--- a/lisp/progmodes/ada-xref.el
+++ b/lisp/progmodes/ada-xref.el
@@ -1533,7 +1533,7 @@ the project file."
   ;;      .ali file for a spec file.  If we are, go to step 3.
   ;;   3- If the file is not found or step 2 failed:
   ;;      find the name of the "other file", ie the body, and look
-  ;;      for its associated .ali file by subtituing the extension
+  ;;      for its associated .ali file by subtituting the extension
   ;;
   ;; We must also handle the case of separate packages and subprograms:
   ;;   4- If no ali file was found, we try to modify the file name by removing
diff --git a/lisp/progmodes/cc-engine.el b/lisp/progmodes/cc-engine.el
index 57ee3943bbe..2d18498d6f4 100644
--- a/lisp/progmodes/cc-engine.el
+++ b/lisp/progmodes/cc-engine.el
@@ -2594,7 +2594,7 @@ comment at the start of cc-engine.el for more info."
         mstart)               ; start of a macro.
 
     (save-excursion
-      ;; Each time round the following loop, we enter a succesively deeper
+      ;; Each time round the following loop, we enter a successively deeper
       ;; level of brace/paren nesting.  (Except sometimes we "continue at
       ;; the existing level".)  `pa+1' is a pos inside an opening
       ;; brace/paren/bracket, usually just after it.
diff --git a/lisp/progmodes/js.el b/lisp/progmodes/js.el
index f0c86265232..808d17dff54 100644
--- a/lisp/progmodes/js.el
+++ b/lisp/progmodes/js.el
@@ -369,7 +369,8 @@ Match group 1 is the name of the macro.")
 ;; must be h-end.
 ;;
 ;; js--pitem instances are never modified (with the exception
-;; of the b-end field). Instead, modified copies are added at subseqnce parse points.
+;; of the b-end field). Instead, modified copies are added at
+;; subsequence parse points.
 ;; (The exception for b-end and its caveats is described below.)
 ;;
 
diff --git a/lisp/progmodes/meta-mode.el b/lisp/progmodes/meta-mode.el
index d0a34179cc8..53ae22b9908 100644
--- a/lisp/progmodes/meta-mode.el
+++ b/lisp/progmodes/meta-mode.el
@@ -384,7 +384,7 @@ Each entry is a list with the following elements:
 1. Regexp matching the preceding text.
 2. A number indicating the subgroup in the regexp containing the text.
 3. A function returning an alist of possible completions.
-4. Text to append after a succesful completion (if any).
+4. Text to append after a successful completion (if any).
 
 Or alternatively:
 1. Regexp matching the preceding text.
diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el
index 52e7b6e2429..f68398c6459 100644
--- a/lisp/progmodes/verilog-mode.el
+++ b/lisp/progmodes/verilog-mode.el
@@ -1423,7 +1423,7 @@ If set will become buffer local.")
       ["AUTOSENSE"                      (describe-function 'verilog-auto-sense)
        :help            "Help on AUTOSENSE - sensitivity lists for always blocks"]
       ["AUTOTIEOFF"                     (describe-function 'verilog-auto-tieoff)
-       :help            "Help on AUTOTIEOFF - tieing off unused outputs"]
+       :help            "Help on AUTOTIEOFF - tying off unused outputs"]
       ["AUTOUNUSED"                     (describe-function 'verilog-auto-unused)
        :help            "Help on AUTOUNUSED - terminating unused inputs"]
       ["AUTOWIRE"                       (describe-function 'verilog-auto-wire)
@@ -1667,7 +1667,7 @@ This speeds up complicated regexp matches."
   ;; Similar to `delete-trailing-whitespace' but that's not present in XEmacs
   (save-excursion
     (goto-char (point-min))
-    (while (re-search-forward "[ \t]+$" nil t)  ;; Not syntatic WS as no formfeed
+    (while (re-search-forward "[ \t]+$" nil t)  ;; Not syntactic WS as no formfeed
       (replace-match "" nil nil))))
 
 (defvar compile-command)
@@ -11725,7 +11725,7 @@ this is a recent change.  To control this behavior, see
 `verilog-auto-reset-widths'.
 
 AUTORESET ties signals to deasserted, which is presumed to be zero.
-Signals that match `verilog-active-low-regexp' will be deasserted by tieing
+Signals that match `verilog-active-low-regexp' will be deasserted by tying
 them to a one.
 
 An example:
@@ -11816,7 +11816,7 @@ finds all outputs in the module, and if that input is not otherwise declared
 as a register or wire, creates a tieoff.
 
 AUTORESET ties signals to deasserted, which is presumed to be zero.
-Signals that match `verilog-active-low-regexp' will be deasserted by tieing
+Signals that match `verilog-active-low-regexp' will be deasserted by tying
 them to a one.
 
 You can add signals you do not want included in AUTOTIEOFF with
diff --git a/lisp/ps-mule.el b/lisp/ps-mule.el
index db5b57f8585..acf341e8879 100644
--- a/lisp/ps-mule.el
+++ b/lisp/ps-mule.el
@@ -1141,7 +1141,7 @@ It checks if all multi-byte characters in the region are printable or not."
                            (aref ps-mule-font-spec-tables font-type) 0)))
     (ps-output-prologue
      (list (if (ps-mule-font-spec-src (cdr (car font-spec-alist)))
-               ;; We ignore a font specfied in ps-font-info-database.
+               ;; We ignore a font specified in ps-font-info-database.
                (format "/V%s VTOP%d def\n" fonttag font-type)
              (format "/V%s [ VTOP%d aload pop ] def\n
 V%s 0 /%s-latin1 /%s Latin1Encoding put\n"
diff --git a/lisp/select.el b/lisp/select.el
index 10c8f0b1efd..521d119792f 100644
--- a/lisp/select.el
+++ b/lisp/select.el
@@ -106,7 +106,7 @@ in `selection-converter-alist', which see."
                              ((eq data-type 'STRING)
                               'iso-8859-1)
                              (t
-                              (error "Unknow selection data type: %S" type))))
+                              (error "Unknown selection data type: %S" type))))
             data (if coding (decode-coding-string data coding)
                    (string-to-multibyte data)))
       (setq next-selection-coding-system nil)
diff --git a/lisp/textmodes/texnfo-upd.el b/lisp/textmodes/texnfo-upd.el
index 69d68a76d4b..df5f41eb925 100644
--- a/lisp/textmodes/texnfo-upd.el
+++ b/lisp/textmodes/texnfo-upd.el
@@ -41,7 +41,7 @@
 ;;
 ;; Important note: We do NOT recommend use of these commands to update
 ;; the `Next', `Previous' and `Up' pointers on @node lines.  Most
-;; manuals, including those whose Texinfo files adhere to the strucure
+;; manuals, including those whose Texinfo files adhere to the structure
 ;; described below, don't need these pointers, because makeinfo will
 ;; generate them automatically (see the node "makeinfo Pointer
 ;; Creation" in the Texinfo manual).  By contrast, due to known bugs
diff --git a/lisp/url/url-methods.el b/lisp/url/url-methods.el
index 3b86ed45565..2f184dfca19 100644
--- a/lisp/url/url-methods.el
+++ b/lisp/url/url-methods.el
@@ -62,7 +62,7 @@
 
 (defun url-scheme-default-loader (url &optional callback cbargs)
   "Signal an error for an unknown URL scheme."
-  (error "Unkown URL scheme: %s" (url-type url)))
+  (error "Unknown URL scheme: %s" (url-type url)))
 
 (defvar url-scheme--registering-proxy nil)
 
diff --git a/lisp/vc/pcvs-parse.el b/lisp/vc/pcvs-parse.el
index 43292ed14e4..6d2724a1172 100644
--- a/lisp/vc/pcvs-parse.el
+++ b/lisp/vc/pcvs-parse.el
@@ -423,7 +423,7 @@ The remaining KEYS are passed directly to `cvs-create-fileinfo'."
         (cvs-match "restoring \\(.*\\) from backup file .*$" (path 1))))
       t)
 
-     ;; Is it a succesful merge?
+     ;; Is it a successful merge?
      ;; Figure out result of merging (ie, was there a conflict?)
      (let ((qfile (regexp-quote path)))
        (cvs-or
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 07eccaff4fb..c576cc0a4a6 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -1687,7 +1687,7 @@ The value of the :type attribute should be an unconverted widget type."
   (eval-minibuffer prompt))
 
 (defun widget-docstring (widget)
-  "Return the documentation string specificied by WIDGET, or nil if none.
+  "Return the documentation string specified by WIDGET, or nil if none.
 If WIDGET has a `:doc' property, that specifies the documentation string.
 Otherwise, try the `:documentation-property' property.  If this
 is a function, call it with the widget's value as an argument; if
diff --git a/lisp/window.el b/lisp/window.el
index 0014d85a816..fffeb5f5e4e 100644
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -4814,7 +4814,7 @@ return the window used; otherwise return nil."
   "Display BUFFER by popping up a new window.
 The new window is created on the selected frame, or in
 `last-nonminibuffer-frame' if no windows can be created there.
-If sucessful, return the new window; otherwise return nil."
+If successful, return the new window; otherwise return nil."
   (let ((frame (or (window--frame-usable-p (selected-frame))
                    (window--frame-usable-p (last-nonminibuffer-frame))))
         window)