Mercurial > emacs
changeset 68314:e5fac4fecc67
(flyspell-emacs-popup, flypell-xemacs-popup): Default to disabling the
"Save affix" question.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Sat, 21 Jan 2006 13:09:16 +0000 |
| parents | 20ff812ba5b3 |
| children | 3bbaff5d6860 |
| files | lisp/textmodes/flyspell.el |
| diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/flyspell.el Sat Jan 21 13:01:28 2006 +0000 +++ b/lisp/textmodes/flyspell.el Sat Jan 21 13:09:16 2006 +0000 @@ -2080,7 +2080,8 @@ corrects) '())) (affix (car (cdr (cdr (cdr poss))))) - (base-menu (let ((save (if (consp affix) + show-affix-info + (base-menu (let ((save (if (and (consp affix) show-affix-info) (list (list (concat "Save affix: " (car affix)) 'save) @@ -2121,7 +2122,8 @@ corrects) '())) (affix (car (cdr (cdr (cdr poss))))) - (menu (let ((save (if (consp affix) + show-affix-info + (menu (let ((save (if (and (consp affix) show-affix-info) (vector (concat "Save affix: " (car affix)) (list 'flyspell-do-correct