From: Rudolf Adamkovič <rudolf@adamkovic.org>
Date: Fri, 24 Jan 2025 09:52:14 +0000 (+0100)
Subject: Ispell: Use "personal dictionary" terminology consistently
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2a277c3e034a1c775b0409f31c8e0936dd166422;p=emacs.git

Ispell: Use "personal dictionary" terminology consistently

* lisp/textmodes/ispell.el (ispell-command-loop, ispell-help): Use
consistent terminology when referring to "personal dictionary".
(Bug#75802)

(cherry picked from commit 5638b1d6bd41e822796cbba1e1692c0899183bb5)
---

diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 63163cea100..6fb07092bcf 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -56,7 +56,7 @@
 ;; Commands in ispell-region:
 ;; Character replacement: Replace word with choice.  May query-replace.
 ;; ` ': Accept word this time.
-;; `i': Accept word and insert into private dictionary.
+;; `i': Accept word and insert into personal dictionary.
 ;; `a': Accept word for this session.
 ;; `A': Accept word and place in buffer-local dictionary.
 ;; `r': Replace word with typed-in value.  Rechecked.
@@ -2191,7 +2191,7 @@ Global `ispell-quit' is set to start location to continue spell session."
 	      (insert (car guess) "    ")
 	      (setq guess (cdr guess)))
 	    (insert (substitute-command-keys
-		     "\nUse option `i' to accept this spelling and put it in your private dictionary.\n"))))
+		     "\nUse option `i' to accept this spelling and put it in your personal dictionary.\n"))))
       (while choices
 	(when (> (+ 7 (current-column)
 		    (length (car choices))
@@ -2446,7 +2446,7 @@ Selections are:
 
 \\`0'..\\`9'  Replace the word with a digit offered in the *Choices* buffer.
 \\`SPC' Accept word this time.
-\\`i'   Accept word and insert into private dictionary.
+\\`i'   Accept word and insert into personal dictionary.
 \\`a'   Accept word for this session.
 \\`A'   Accept word and place in `buffer-local dictionary'.
 \\`r'   Replace word with typed-in value.  Rechecked.
@@ -2463,7 +2463,7 @@ Selections are:
 \\`C-r' Recursive edit.
 \\`C-z' Suspend Emacs or iconify frame."
   (let ((help-1 (concat "[r/R]eplace word; [a/A]ccept for this session; "
-			"[i]nsert into private dictionary"))
+			"[i]nsert into personal dictionary"))
 	(help-2 (concat "[l]ook a word up in alternate dictionary;  "
 			"e[x/X]it;  [q]uit session"))
 	(help-3 (concat "[u]ncapitalized insert into dict.  "