Mercurial > emacs
changeset 111336:414281a5ab3c
Silence ispell.el compilation.
* lisp/textmodes/ispell.el (ispell-init-process): On Emacs, always use
set-process-query-on-exit-flag.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Wed, 03 Nov 2010 00:42:27 -0700 |
| parents | 96c3de40fa1b |
| children | 4fc3989048ca |
| files | lisp/ChangeLog lisp/textmodes/ispell.el |
| diffstat | 2 files changed, 7 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Nov 03 00:20:03 2010 -0700 +++ b/lisp/ChangeLog Wed Nov 03 00:42:27 2010 -0700 @@ -1,5 +1,8 @@ 2010-11-03 Glenn Morris <rgm@gnu.org> + * textmodes/ispell.el (ispell-init-process): On Emacs, always use + set-process-query-on-exit-flag. + * textmodes/reftex-toc.el (name1, dummy, dummy2): Remove unused decs. * net/dbus.el (dbus-name-owner-changed-handler): Doc fix.
--- a/lisp/textmodes/ispell.el Wed Nov 03 00:20:03 2010 -0700 +++ b/lisp/textmodes/ispell.el Wed Nov 03 00:42:27 2010 -0700 @@ -2740,9 +2740,11 @@ (if extended-char-mode ; ~ extended character mode (ispell-send-string (concat extended-char-mode "\n")))) (if ispell-async-processp - (if (fboundp 'set-process-query-on-exit-flag) ;; not XEmacs + (if (featurep 'emacs) (set-process-query-on-exit-flag ispell-process nil) - (process-kill-without-query ispell-process)))))) + (if (fboundp 'set-process-query-on-exit-flag) + (set-process-query-on-exit-flag ispell-process nil) + (process-kill-without-query ispell-process))))))) ;;;###autoload (defun ispell-kill-ispell (&optional no-error)