; Fix typos in symbol names

diff --git a/admin/cus-test.el b/admin/cus-test.el
index 62fec77c16fb2561b73f1e9b3afc99a4d6225ff2..64c742ea8554b338a4ac01fb45602e900e628eeb 100644 (file)
--- 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 c4eac8c5c396288559c953157768f9edb0fcde08..9afa617908e230e760338f3859533edc71582ca5 100644 (file)
--- 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 20e056c2521cd28696ee2dd7397b1e2cc4db7061..9ef473b1b4310e0b5b5268f491b2329cc67db510 100644 (file)
--- 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 4171ba3cb1d2cf7a63a16dd5203339e7fa4a13dc..88e41e96a825888047356ef5ee6a30a56b3c9a0a 100644 (file)
--- 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 2ccb528fee93c54c1877ac935f2d4558509dd7d0..f2060d3faa1a79cd477fe2bef3e8c07a5f701e7e 100644 (file)
--- 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 577898f82bdbf8855630c42f1d8e92f6c9889388..60c88221a6576cc677484ca744b96caa93fd8c5a 100644 (file)
--- 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 ff587bba38cb732f97cca552ed861eec0a5cfb63..796191dd3860e2d2fe1dbd3b53584faad5d63b40 100644 (file)
--- 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 73b3c9bbf8cd439cad100a4c3511b58dff2a9c9d..be90ca398a1170526f63e59d6fb6a176ca59b8f4 100644 (file)
--- 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 55541834784415ce918d1ed5fa7dea27d244ba04..b891284a8bb79eb15c38bb0ea65f7fd336a24b7f 100644 (file)
--- 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 f44b50c99ea05235c92d97d7f26cd14fe79b2d51..c83728a8f09895f67c13bbbe35bd593d5e1f0343 100644 (file)
--- 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 64fd548e82445659cd7b6defc5b668275b789108..1e90e26a5371bddba701959f6c00d796f04b736e 100644 (file)
--- 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 e3dedf247d1b52185f28c2d83a5593458a0b7a69..647938c3b864bcd59c46dc784d8761747492a8c0 100644 (file)
--- 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 02ad6b85c37e26b818fb0d078efdbd436995df26..92d65c75816e90100a3a536fe545be3334dd5cf5 100644 (file)
--- 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 c63bf510a24244a56792159906cc200b7842cf37..2676ed932dc244ef6291a316fadb0dbc94eb305d 100644 (file)
--- 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 c7cd32e6200a5637957a183330c2228ce029daa0..13fe1feba10034aa41d5c498900bac9683453297 100644 (file)
--- 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))))