From cdd0f857a60da3a08afb0ac61f3d316749408771 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 18 Aug 2000 18:46:25 +0000 Subject: [PATCH] (ispell-menu-map-needed): Put back the boundp check since ispell-process is not bound when ispell is not yet loaded. --- lisp/ChangeLog | 6 ++++++ lisp/textmodes/ispell.el | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0bf841cfd54..899a5a50406 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2000-08-18 Stefan Monnier + + * textmodes/ispell.el (ispell-menu-map-needed): Put back the boundp + check since ispell-process is not bound when ispell is not yet loaded. + 2000-08-18 Dave Love * image.el (find-image): Copy `spec' before using plist-put. @@ -109,6 +114,7 @@ * mail/mh-e.el (mh-make-local-vars): Replace make-variable-buffer-local with make-local-variable. + * play/landmark.el: * options.el (Edit-options-{set,toggle,t,nil}): * mail/mailabbrev.el (mail-abbrevs-mode): * textmodes/tex-mode.el (tex-expand-files): diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 9001bdb5ea0..c536cbe4f8d 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -862,7 +862,7 @@ and added as a submenu of the \"Edit\" menu.") :help "Supply explicit path to dictionary")) (define-key ispell-menu-map [ispell-kill-ispell] '(menu-item "Kill Process" ispell-kill-ispell - :enable (and ispell-process + :enable (and (boundp 'ispell-process) ispell-process (eq (ispell-process-status) 'run)) :help "Terminate Ispell subprocess")) (define-key ispell-menu-map [ispell-pdict-save] -- 2.39.2