Mercurial > emacs
diff lisp/textmodes/flyspell.el @ 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 | aa1b3e649cc8 |
children | 6c8eee5f9e6e 5b7d410e31f9 |
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