; Fix typos in symbol names

15 files changed, 16 insertions, 16 deletions

diff --git a/admin/cus-test.el b/admin/cus-test.el
index 62fec77c16f..64c742ea855 100644
--- a/admin/cus-test.el
+++ b/admin/cus-test.el
@@ -146,7 +146,7 @@ Names should be as they appear in loaddefs.el.")
 
 (defvar cus-test-errors nil
   "List of problematic variables found by `cus-test-apropos'.
-Each element is (VARIABLE . PROBLEM); see `cus-test--format-problem'.")
+Each element is (VARIABLE . PROBLEM); see `cus-test--format-errors'.")
 
 (defvar cus-test-tested-variables nil
   "List of options tested by last call of `cus-test-apropos'.")
diff --git a/lisp/abbrev.el b/lisp/abbrev.el
index c4eac8c5c39..9afa617908e 100644
--- a/lisp/abbrev.el
+++ b/lisp/abbrev.el
@@ -1275,7 +1275,7 @@ which see."
   (setq font-lock-multiline nil))
 
 (defun abbrev--possibly-save (query &optional arg)
-  "Hook function for use by `save-some-buffer-functions'.
+  "Hook function for use by `save-some-buffers-functions'.
 
 Maybe save abbrevs, and record whether we either saved them or asked to."
   ;; Query mode.
diff --git a/lisp/calendar/todo-mode.el b/lisp/calendar/todo-mode.el
index 20e056c2521..9ef473b1b43 100644
--- a/lisp/calendar/todo-mode.el
+++ b/lisp/calendar/todo-mode.el
@@ -1516,7 +1516,7 @@ the archive of the file moved to, creating it if it does not exist."
                 (prin1 todo-categories (current-buffer)))
               ;; If archive was just created, save it to avoid "File
               ;; <xyz> no longer exists!" message on invoking
-              ;; `todo-view-archived-items'.
+              ;; `todo-find-archive'.
               (unless (file-exists-p (buffer-file-name))
                 (save-buffer))
               (todo-category-number (or new cat))
diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index 4171ba3cb1d..88e41e96a82 100644
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -2192,7 +2192,7 @@ parameters SERVER and NICK."
 ;; (bug#60428).
 (defun erc--warn-unencrypted ()
   ;; Remove unconditionally to avoid wrong context due to races from
-  ;; simultaneous dialing or aborting (e.g., via `keybaord-quit').
+  ;; simultaneous dialing or aborting (e.g., via `keyboard-quit').
   (remove-hook 'erc--server-post-connect-hook #'erc--warn-unencrypted)
   (when (and (process-contact erc-server-process :nowait)
              (equal erc-session-server erc-default-server)
diff --git a/lisp/jsonrpc.el b/lisp/jsonrpc.el
index 2ccb528fee9..f2060d3faa1 100644
--- a/lisp/jsonrpc.el
+++ b/lisp/jsonrpc.el
@@ -555,7 +555,7 @@ With optional CLEANUP, kill any associated buffers."
   "Called when new data STRING has arrived for PROC."
   (when jsonrpc--in-process-filter
     ;; Problematic recursive process filters may happen if
-    ;; `jsonrpc--connection-receive', called by us, eventually calls
+    ;; `jsonrpc-connection-receive', called by us, eventually calls
     ;; client code which calls `process-send-string' (which see) to,
     ;; say send a follow-up message.  If that happens to writes enough
     ;; bytes for pending output to be received, we will lose JSONRPC
diff --git a/lisp/leim/quail/cyrillic.el b/lisp/leim/quail/cyrillic.el
index 577898f82bd..60c88221a65 100644
--- a/lisp/leim/quail/cyrillic.el
+++ b/lisp/leim/quail/cyrillic.el
@@ -1101,9 +1101,9 @@ as follows.
 ;; Ognyan Kulev <ogi@fmi.uni-sofia.bg> wrote:
 
 ;; I would suggest future `cyrillic-translit' to be with the
-;; modification of `cyrillic-translit-bulgarian' applied and the
+;; modification of `cyrillic-translit-bulgarian' (now deleted) applied and the
 ;; latter to disappear.  It could be used by people who write
-;; bulgarian e-mails with latin letters for kick start (phonetic input
+;; Bulgarian e-mails with latin letters for kick start (phonetic input
 ;; method is not so obvious as translit input method but each letter
 ;; is one keypress and a *lot* of people know it).
 
diff --git a/lisp/org/org-element.el b/lisp/org/org-element.el
index ff587bba38c..796191dd386 100644
--- a/lisp/org/org-element.el
+++ b/lisp/org/org-element.el
@@ -6556,7 +6556,7 @@ the expected result."
                    (error "org-element: Parsing aborted by user.  Cache has been cleared.
 If you observe Emacs hangs frequently, please report this to Org mode mailing list (M-x org-submit-bug-report)."))
                  (message (substitute-command-keys
-                           "`org-element--parse-buffer': Suppressed `\\[keyboard-quit]'.  Press `\\[keyboard-quit]' %d more times to force interruption.")
+                           "`org-element--parse-to': Suppressed `\\[keyboard-quit]'.  Press `\\[keyboard-quit]' %d more times to force interruption.")
                           (- org-element--cache-interrupt-C-g-max-count
                              org-element--cache-interrupt-C-g-count)))
                (unless element
diff --git a/lisp/org/org-fold-core.el b/lisp/org/org-fold-core.el
index 73b3c9bbf8c..be90ca398a1 100644
--- a/lisp/org/org-fold-core.el
+++ b/lisp/org/org-fold-core.el
@@ -433,7 +433,7 @@ Return nil when there is no matching folding spec."
   (org-fold-core-get-folding-spec-from-alias spec-or-alias))
 
 (defsubst org-fold-core--check-spec (spec-or-alias)
-  "Throw an error if SPEC-OR-ALIAS is not in `org-fold-core--spec-priority-list'."
+  "Throw an error if SPEC-OR-ALIAS is not in `org-fold-core-folding-spec-list'."
   (unless (org-fold-core-folding-spec-p spec-or-alias)
     (error "%s is not a valid folding spec" spec-or-alias)))
 
diff --git a/lisp/org/org-macs.el b/lisp/org/org-macs.el
index 55541834784..b891284a8bb 100644
--- a/lisp/org/org-macs.el
+++ b/lisp/org/org-macs.el
@@ -1072,7 +1072,7 @@ Return width in pixels when PIXELS is non-nil."
       ;; FIXME: Fallback to old limited version, because
       ;; `window-pixel-width' is buggy in older Emacs.
       (org--string-width-1 string)
-    ;; Wrap/line prefix will make `window-text-pizel-size' return too
+    ;; Wrap/line prefix will make `window-text-pixel-size' return too
     ;; large value including the prefix.
     (remove-text-properties 0 (length string)
                             '(wrap-prefix t line-prefix t)
diff --git a/lisp/org/ox-latex.el b/lisp/org/ox-latex.el
index f44b50c99ea..c83728a8f09 100644
--- a/lisp/org/ox-latex.el
+++ b/lisp/org/ox-latex.el
@@ -3667,7 +3667,7 @@ CONTENTS is the contents of the object."
 ;; takes care of tables with a "verbatim" mode.  Otherwise, it
 ;; delegates the job to either `org-latex--table.el-table',
 ;; `org-latex--org-table', `org-latex--math-table' or
-;; `org-latex--org-tabbing' functions,
+;; `org-latex--org-align-string-tabbing' functions,
 ;; depending of the type of the table and the mode requested.
 ;;
 ;; `org-latex--align-string' is a subroutine used to build alignment
diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 64fd548e824..1e90e26a537 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -1592,7 +1592,7 @@ If optional MARKER, return a marker instead"
   (let ((vec (copy-sequence url-path-allowed-chars)))
     (aset vec ?: nil) ;; see github#639
     vec)
-  "Like `url-path-allows-chars' but more restrictive.")
+  "Like `url-path-allowed-chars' but more restrictive.")
 
 (defun eglot--path-to-uri (path)
   "URIfy PATH."
diff --git a/lisp/term.el b/lisp/term.el
index e3dedf247d1..647938c3b86 100644
--- a/lisp/term.el
+++ b/lisp/term.el
@@ -1109,7 +1109,7 @@ variable `term-input-autoexpand', and addition is controlled by the
 variable `term-input-ignoredups'.
 
 Input to, and output from, the subprocess can cause the window to scroll to
-the end of the buffer.  See variables `term-scroll-to-bottom-on-input',
+the end of the buffer.  See variables `term-scroll-snap-to-bottom',
 and `term-scroll-to-bottom-on-output'.
 
 If you accidentally suspend your process, use \\[term-continue-subjob]
diff --git a/lisp/term/pc-win.el b/lisp/term/pc-win.el
index 02ad6b85c37..92d65c75816 100644
--- a/lisp/term/pc-win.el
+++ b/lisp/term/pc-win.el
@@ -47,7 +47,7 @@
 
 ;; This was copied from etc/rgb.txt, except that some values were changed
 ;; a bit to make them consistent with DOS console colors, and the RGB
-;; values were scaled up to 16 bits, as `tty-define-color' requires.
+;; values were scaled up to 16 bits, as `tty-color-define' requires.
 ;;;
 ;; The mapping between the 16 standard EGA/VGA colors and X color names
 ;; was done by running a Unix version of Emacs inside an X client and a
diff --git a/lisp/treesit.el b/lisp/treesit.el
index c63bf510a24..2676ed932dc 100644
--- a/lisp/treesit.el
+++ b/lisp/treesit.el
@@ -1422,7 +1422,7 @@ no-node
 
 comment-end
 
-    Matches if text after point matches `treesit-comment-end'.
+    Matches if text after point matches `comment-end-skip'.
 
 catch-all
 
diff --git a/lisp/window.el b/lisp/window.el
index c7cd32e6200..13fe1feba10 100644
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -8528,7 +8528,7 @@ buffer.  ALIST is a buffer display action alist as compiled by
   canonical frame lines.  If it is the constant `full-height',
   prefer a full-height window.
 
-If ALIST contains a non-nil `inhibit-same--window' entry, do not
+If ALIST contains a non-nil `inhibit-same-window' entry, do not
 return the selected window."
   (let ((windows
          (window-list-1 nil 'nomini (cdr (assq 'lru-frames alist))))