; Spelling fixes

17 files changed, 36 insertions, 36 deletions

diff --git a/lisp/ChangeLog.7 b/lisp/ChangeLog.7
index 2fe98e8f00d..2c2aabd94b5 100644
--- a/lisp/ChangeLog.7
+++ b/lisp/ChangeLog.7
@@ -17104,8 +17104,8 @@
         the rewrite of `hs-inside-comment-p'.
         (hs-inside-comment-p): Rewritten from scratch.  Semantics changed
         when returning non-nil.  We can be inside a comment, but that
-        comment might not be hidable (the car of the return value should
-        be non-nil to be hidable).
+        comment might not be hideable (the car of the return value should
+        be non-nil to be hideable).
         (hs-grok-mode-type): Rewrite to be more understandable.
         `hs-c-end-regexp' does not exist any more.
         Initialize `hs-c-start-regexp' from the alist if specified there.
@@ -17117,7 +17117,7 @@
         block, go to their end and look there for the overlays.
         (java-hs-adjust-block-beginning): New function.
         (hs-hide-all): Hide a comment block only if `hs-inside-comment-p'
-        says is hidable.
+        says is hideable.
         (hs-hide-block): Simplify.  Handle properly the result of
         `hs-inside-comment-p'.
         (hs-show-block): Likewise.
diff --git a/lisp/auth-source-pass.el b/lisp/auth-source-pass.el
index 45d5a6ce81b..7201a2d1a2c 100644
--- a/lisp/auth-source-pass.el
+++ b/lisp/auth-source-pass.el
@@ -292,7 +292,7 @@ components, from longest to shortest."
 (defun auth-source-pass--name-port-user-suffixes (name user port)
   "Return a list of possible path suffixes for NAME, USER, & PORT.
 
-The resulting list is ordered from most specifc to least
+The resulting list is ordered from most specific to least
 specific, with paths matching all of NAME, USER, & PORT first,
 then NAME & USER, then NAME & PORT, then just NAME."
   (seq-mapcat
diff --git a/lisp/button.el b/lisp/button.el
index ac6af0be4f8..d5aaf1b42ee 100644
--- a/lisp/button.el
+++ b/lisp/button.el
@@ -243,7 +243,7 @@ overlay, a buffer position, or (for buttons in the mode-line or
 header-line) a string.
 
 If BUTTON has a `button-data' value, call the function with this
-value instad of BUTTON.
+value instead of BUTTON.
 
 This function only works when BUTTON is in the current buffer."
   (let ((action (or (and use-mouse-action (button-get button 'mouse-action))
diff --git a/lisp/cedet/ChangeLog.1 b/lisp/cedet/ChangeLog.1
index 1d34219daa0..cf8d6c4f6c6 100644
--- a/lisp/cedet/ChangeLog.1
+++ b/lisp/cedet/ChangeLog.1
@@ -453,7 +453,7 @@
 
         * semantic/ctxt.el (semantic-get-local-variables-default):
         Also try to parse local variables for buffers which are currently
-        marked as unparseable.  Otherwise, it is often impossible to
+        marked as unparsable.  Otherwise, it is often impossible to
         complete local variables.
 
         * semantic/scope.el (semantic-analyze-scoped-types-default): If we
diff --git a/lisp/gnus/gnus-cus.el b/lisp/gnus/gnus-cus.el
index 5291d1d64d1..57e7f7c8c35 100644
--- a/lisp/gnus/gnus-cus.el
+++ b/lisp/gnus/gnus-cus.el
@@ -257,7 +257,7 @@ Server-assigned value attached to IMAP groups, used to maintain consistency.")
     (modseq (choice :tag "modseq"
                     (const :tag "None" nil)
                     (string :tag "Sequence number"))
-            "Modification seqence number")
+            "Modification sequence number")
     (active (cons :tag "active" (integer :tag "min") (integer :tag "max"))
             "active")
     (permanent-flags (repeat :tag "Permanent Flags" (symbol :tag "Flag"))
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index bbbca8f4193..f02c2e5c1f1 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -233,7 +233,7 @@ textual parts.")
     'headers))
 
 (defun nnimap-transform-headers ()
-  "Transform server's FETCH response into parseable headers."
+  "Transform server's FETCH response into parsable headers."
   (goto-char (point-min))
   (let (seen-articles article lines size string labels)
     (cl-block nil
diff --git a/lisp/icomplete.el b/lisp/icomplete.el
index 16167ea21e1..cd20064be02 100644
--- a/lisp/icomplete.el
+++ b/lisp/icomplete.el
@@ -69,7 +69,7 @@ When nil, show candidates in full."
   :version "24.4")
 
 (defvar icomplete-tidy-shadowed-file-names nil
-  "If non-nil, automatically delete superflous parts of file names.
+  "If non-nil, automatically delete superfluous parts of file names.
 For example, if the user types ~/ after a long path name,
 everything preceding the ~/ is discarded so the interactive
 selection process starts again from the user's $HOME.")
diff --git a/lisp/net/newst-backend.el b/lisp/net/newst-backend.el
index 9c24dec2a1e..792ddbbf0b7 100644
--- a/lisp/net/newst-backend.el
+++ b/lisp/net/newst-backend.el
@@ -1598,7 +1598,7 @@ This function calls `message' with arguments STRING and ARGS, if
 (defun newsticker--decode-iso8601-date (string)
   "Return ISO8601-STRING in format like `encode-time'.
 Converts from ISO-8601 to Emacs representation.  If no time zone
-is present, this fuction defaults to universal time."
+is present, this function defaults to universal time."
   (if string
       (condition-case nil
           (encode-time (decoded-time-set-defaults (iso8601-parse string) 0))
diff --git a/lisp/org/org-attach.el b/lisp/org/org-attach.el
index bc49be7fe74..d3e1c78b7da 100644
--- a/lisp/org/org-attach.el
+++ b/lisp/org/org-attach.el
@@ -187,7 +187,7 @@ attachment folders based on ID."
   "Hook that is invoked by `org-attach-open'.
 
 Created mostly to be compatible with org-attach-git after removing
-git-funtionality from this file.")
+git-functionality from this file.")
 
 (defcustom org-attach-commands
   '(((?a ?\C-a) org-attach-attach
@@ -231,7 +231,7 @@ directory in dired and delete from there.\n")
 Each entry in this list is a list of three elements:
 - A list of keys (characters) to select the command (the fist
   character in the list is shown in the attachment dispatcher's
-  splash buffer and minubuffer prompt).
+  splash buffer and minibuffer prompt).
 - A command that is called interactively when one of these keys
   is pressed.
 - A docstring for this command in the attachment dispatcher's
diff --git a/lisp/org/org.el b/lisp/org/org.el
index 11bc3641022..c289d5425ec 100644
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -9854,9 +9854,9 @@ Elements of length one have a tab appended.  Elements of length
 two are kept as is.  Longer elements are truncated to length two.
 
 If an element cannot be made unique, an error is raised."
-  (let ((orderd-keys (cl-sort (copy-sequence keys) #'< :key #'length))
+  (let ((ordered-keys (cl-sort (copy-sequence keys) #'< :key #'length))
         menu-keys)
-    (dolist (key orderd-keys)
+    (dolist (key ordered-keys)
       (let ((potential-key
              (cl-case (length key)
                (1 (concat key "\t"))
diff --git a/lisp/progmodes/cc-langs.el b/lisp/progmodes/cc-langs.el
index 44d0d49df5b..da3fc6b318e 100644
--- a/lisp/progmodes/cc-langs.el
+++ b/lisp/progmodes/cc-langs.el
@@ -1416,7 +1416,7 @@ template opener followed by the \"::\" operator - usually."
                (c-lang-const c-<-pseudo-digraph-cont-regexp))
 
 (c-lang-defconst c-<-pseudo-digraph-cont-len
-  "The maximum length of the main bit of a `c-<pseudp-digraph-cont-regexp' match.
+  "The maximum length of the main bit of a `c-<-pseudo-digraph-cont-regexp' match.
 This doesn't count the merely contextual bits of the regexp match."
   t 0
   c++ 2)
diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el
index f052e002df7..d980d675d4d 100644
--- a/lisp/progmodes/flymake.el
+++ b/lisp/progmodes/flymake.el
@@ -708,7 +708,7 @@ backend is operating normally.")
   "Tell if Flymake has running backends in this buffer."
   (flymake-running-backends))
 
-;; FIXME: clone of `isearch-intesects-p'! Make this an util.
+;; FIXME: clone of `isearch-intersects-p'! Make this an util.
 (defun flymake--intersects-p (start0 end0 start1 end1)
   "Return t if regions START0..END0 and START1..END1 intersect."
   (or (and (>= start0 start1) (<  start0 end1))
diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el
index 53235ea573b..8f8b79af74b 100644
--- a/lisp/progmodes/hideshow.el
+++ b/lisp/progmodes/hideshow.el
@@ -610,7 +610,7 @@ as cdr."
         (forward-comment (- (buffer-size)))
         (skip-chars-forward " \t\n\f")
         (let ((p (point))
-              (hidable t))
+              (hideable t))
           (beginning-of-line)
           (unless (looking-at (concat "[ \t]*" hs-c-start-regexp))
             ;; we are in this situation: (example)
@@ -636,13 +636,13 @@ as cdr."
             (when (or (not (looking-at hs-c-start-regexp))
                       (> (point) q))
               ;; we cannot hide this comment block
-              (setq hidable nil)))
+              (setq hideable nil)))
           ;; goto the end of the comment
           (forward-comment (buffer-size))
           (skip-chars-backward " \t\n\f")
           (end-of-line)
           (when (>= (point) q)
-            (list (and hidable p) (point))))))))
+            (list (and hideable p) (point))))))))
 
 (defun hs-grok-mode-type ()
   "Set up hideshow variables for new buffers.
@@ -741,7 +741,7 @@ and `case-fold-search' are both t."
   (save-excursion
     (let ((c-reg (hs-inside-comment-p)))
       (if (and c-reg (nth 0 c-reg))
-          ;; point is inside a comment, and that comment is hidable
+          ;; point is inside a comment, and that comment is hideable
           (goto-char (nth 0 c-reg))
         (end-of-line)
         (when (and (not c-reg)
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index 0eed7acd0d7..b0d3174eabc 100644
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -3856,8 +3856,8 @@ Returns the tracked buffer."
 
 (defun python-pdbtrack-comint-input-filter-function (input)
   "Finish tracking session depending on command in INPUT.
-Commands that must finish tracking session is listed in
-`python-pdbtrack-untracking-commands'."
+Commands that must finish the tracking session are listed in
+`python-pdbtrack-exit-command'."
   (when (and python-pdbtrack-tracked-buffer
              ;; Empty input is sent by C-d or `comint-send-eof'
              (or (string-empty-p input)
diff --git a/lisp/so-long.el b/lisp/so-long.el
index 3df2de97297..160a945f657 100644
--- a/lisp/so-long.el
+++ b/lisp/so-long.el
@@ -69,7 +69,7 @@
 ;; the long lines.  In such circumstances you may find that `longlines-mode' is
 ;; the most helpful facility.
 ;;
-;; Note also that the mitigations are automatically triggered when visiting a
+;; Note also that the mitigation is automatically triggered when visiting a
 ;; file.  The library does not automatically detect if long lines are inserted
 ;; into an existing buffer (although the `so-long' command can be invoked
 ;; manually in such situations).
@@ -386,7 +386,7 @@
 ;;       - Added sgml-mode and nxml-mode to `so-long-target-modes'.
 ;; 0.7.4 - Refactored the handling of `whitespace-mode'.
 ;; 0.7.3 - Added customize group `so-long' with user options.
-;;       - Added `so-long-original-values' to generalise the storage and
+;;       - Added `so-long-original-values' to generalize the storage and
 ;;         restoration of values from the original mode upon `so-long-revert'.
 ;;       - Added `so-long-revert-hook'.
 ;; 0.7.2 - Remember the original major mode even with M-x `so-long-mode'.
@@ -421,7 +421,7 @@
 Has no effect if `global-so-long-mode' is not enabled.")
 
 (defvar-local so-long--active nil ; internal use
-  "Non-nil when `so-long' mitigations are in effect.")
+  "Non-nil when `so-long' mitigation is in effect.")
 
 (defvar so-long--set-auto-mode nil ; internal use
   "Non-nil while `set-auto-mode' is executing.")
@@ -740,7 +740,7 @@ was established."
     )
   ;; It's not clear to me whether all of these would be problematic, but they
   ;; seemed like reasonable targets.  Some are certainly excessive in smaller
-  ;; buffers of minified code, but we should be aiming to maximise performance
+  ;; buffers of minified code, but we should be aiming to maximize performance
   ;; by default, so that Emacs is as responsive as we can manage in even very
   ;; large buffers of minified code.
   "List of buffer-local minor modes to explicitly disable.
@@ -781,7 +781,7 @@ If `so-long-revert' is subsequently invoked, then the variables are restored
 to their original states.
 
 The combination of `line-move-visual' (enabled) and `truncate-lines' (disabled)
-is important for maximising responsiveness when moving vertically within an
+is important for maximizing responsiveness when moving vertically within an
 extremely long line, as otherwise the full length of the line may need to be
 scanned to find the next position."
   :type '(alist :key-type (variable :tag "Variable")
@@ -822,12 +822,12 @@ If nil, no mode line indicator will be displayed."
 
 (defface so-long-mode-line-active
   '((t :inherit mode-line-emphasis))
-  "Face for `so-long-mode-line-info' when mitigations are active."
+  "Face for `so-long-mode-line-info' when mitigation is active."
   :package-version '(so-long . "1.0"))
 
 (defface so-long-mode-line-inactive
   '((t :inherit mode-line-inactive))
-  "Face for `so-long-mode-line-info' when mitigations have been reverted."
+  "Face for `so-long-mode-line-info' when mitigation has been reverted."
   :package-version '(so-long . "1.0"))
 
 ;; Modes that go slowly and line lengths excessive
@@ -983,7 +983,7 @@ Displayed as part of `mode-line-misc-info'.
 
 `so-long-mode-line-label' defines the text to be displayed (if any).
 
-Face `so-long-mode-line-active' is used while mitigations are active, and
+Face `so-long-mode-line-active' is used while mitigation is active, and
 `so-long-mode-line-inactive' is used if `so-long-revert' is called.
 
 Not displayed when `so-long-mode' is enabled, as the major mode construct
@@ -1659,7 +1659,7 @@ Equivalent to calling (global-so-long-mode 0)"
 
 ;;;###autoload
 (define-minor-mode global-so-long-mode
-  "Toggle automated performance mitigations for files with long lines.
+  "Toggle automated performance mitigation for files with long lines.
 
 Many Emacs modes struggle with buffers which contain excessively long lines,
 and may consequently cause unacceptable performance issues.
@@ -1861,11 +1861,11 @@ If it appears in `%s', you should remove it."
 ; LocalWords:  initialized profiler boolean minified pre redisplay config keymap
 ; LocalWords:  noerror selectable mapc sgml nxml hl flydiff defs arg Phil Sainty
 ; LocalWords:  defadvice nadvice whitespace ie bos eos eobp origmode un Un setq
-; LocalWords:  docstring auf wiedersehen longlines alist autoload Refactored Inc
-; LocalWords:  MERCHANTABILITY RET REGEXP VAR ELPA WS mitigations EmacsWiki eval
+; LocalWords:  docstring auf Wiedersehen longlines alist autoload Refactored Inc
+; LocalWords:  MERCHANTABILITY RET REGEXP VAR ELPA WS EmacsWiki eval
 ; LocalWords:  rx filename filenames
 
-;; So long, farewell, auf wiedersehen, goodbye
+;; So long, farewell, auf Wiedersehen, goodbye
 ;; You have to go, this code is minified
 ;; Goodbye!
 
diff --git a/lisp/subr.el b/lisp/subr.el
index ca5af0f0ab7..1b2a1d643fb 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1572,7 +1572,7 @@ be a list of the form returned by `event-start' and `event-end'."
 ;; individual bytes at known offsets from the string beginning.
 ;; (make-obsolete 'string-to-unibyte   "use `encode-coding-string'." "26.1")
 ;; string-to-multibyte is also sometimes useful (and there's no good
-;; general replacement for it), so it's also been unobsoleted in Emacs 27.1.
+;; general replacement for it), so it's also been revived in Emacs 27.1.
 ;; (make-obsolete 'string-to-multibyte "use `decode-coding-string'." "26.1")
 ;; bug#23850
 (make-obsolete 'string-as-unibyte   "use `encode-coding-string'." "26.1")
diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el
index 1ce4b98fd1b..c33fb174a58 100644
--- a/lisp/thingatpt.el
+++ b/lisp/thingatpt.el
@@ -634,7 +634,7 @@ Signal an error if the entire string was not used."
 (defun number-at-point ()
   "Return the number at point, or nil if none is found.
 Decimal numbers like \"14\" or \"-14.5\", as well as hex numbers
-like \"0xBEEF09\" or \"#xBEEF09\", are regognized."
+like \"0xBEEF09\" or \"#xBEEF09\", are recognized."
   (when (thing-at-point-looking-at
          "\\(-?[0-9]+\\.?[0-9]*\\)\\|\\(0x\\|#x\\)\\([a-zA-Z0-9]+\\)" 500)
     (if (match-beginning 1)