mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(flyspell-emacs-popup, flypell-xemacs-popup): Default to disabling the

Browse source 
"Save affix" question.
This commit is contained in:
Eli Zaretskii 2006-01-21 13:11:21 +00:00
parent ee6c21a72a
commit f60117ac29
2 changed files with 9 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/textmodes/flyspell.el
View file

@ -2080,7 +2080,8 @@ The word checked is the word at the mouse position."
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 @@ The word checked is the word at the mouse position."
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