summaryrefslogtreecommitdiff
path: root/lisp/icomplete.el
diff options
context:
space:
mode:
authorKim F. Storm <storm@cua.dk>2006-11-28 09:22:13 +0000
committerKim F. Storm <storm@cua.dk>2006-11-28 09:22:13 +0000
commitfe689fb6615bc61d6733a413a5697af437630207 (patch)
treec8b79f365e823509636d72f6d89a809ac938befd /lisp/icomplete.el
parentc09908a3bd09fdd70f7caa2f016e1067637b0e92 (diff)
downloademacs-fe689fb6615bc61d6733a413a5697af437630207.tar.gz
(icomplete-tidy, icomplete-exhibit): Check that
icomplete-mode is enabled.
Diffstat (limited to 'lisp/icomplete.el')
-rw-r--r--lisp/icomplete.el4
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