From: Glenn Morris Date: Wed, 3 Nov 2010 07:42:27 +0000 (-0700) Subject: Silence ispell.el compilation. X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~45^2~394 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e337e22c2400355ea9a22a8114df9c5c2b849d78;p=emacs.git Silence ispell.el compilation. * lisp/textmodes/ispell.el (ispell-init-process): On Emacs, always use set-process-query-on-exit-flag. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ac2b8f484fa..52af63f7b20 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2010-11-03 Glenn Morris + * 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. diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index b75b232b43c..eab64fbc432 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -2740,9 +2740,11 @@ Keeps argument list for future ispell invocations for no async support." (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)