diff options
author | Kim F. Storm <storm@cua.dk> | 2006-11-28 09:22:13 +0000 |
---|---|---|
committer | Kim F. Storm <storm@cua.dk> | 2006-11-28 09:22:13 +0000 |
commit | fe689fb6615bc61d6733a413a5697af437630207 (patch) | |
tree | c8b79f365e823509636d72f6d89a809ac938befd /lisp/icomplete.el | |
parent | c09908a3bd09fdd70f7caa2f016e1067637b0e92 (diff) | |
download | emacs-fe689fb6615bc61d6733a413a5697af437630207.tar.gz |
(icomplete-tidy, icomplete-exhibit): Check that
icomplete-mode is enabled.
Diffstat (limited to 'lisp/icomplete.el')
-rw-r--r-- | lisp/icomplete.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/icomplete.el b/lisp/icomplete.el index 6687c13275b..8c1ee3ad64c 100644 --- a/lisp/icomplete.el +++ b/lisp/icomplete.el @@ -216,7 +216,7 @@ Usually run by inclusion in `minibuffer-setup-hook'." "Remove completions display \(if any) prior to new user input. Should be run in on the minibuffer `pre-command-hook'. See `icomplete-mode' and `minibuffer-setup-hook'." - (when icomplete-eoinput + (when (and icomplete-mode icomplete-eoinput) (unless (>= icomplete-eoinput (point-max)) (let ((buffer-undo-list t)) ; prevent entry @@ -230,7 +230,7 @@ and `minibuffer-setup-hook'." "Insert icomplete completions display. Should be run via minibuffer `post-command-hook'. See `icomplete-mode' and `minibuffer-setup-hook'." - (when (icomplete-simple-completing-p) + (when (and icomplete-mode (icomplete-simple-completing-p)) (save-excursion (goto-char (point-max)) ;; Register the end of input, so we know where the extra stuff |