changeset 37323:11b33211a908

(eshell-previous-matching-input): Don't display "History item" if the the minibuffer is active.
author John Wiegley <johnw@newartisans.com>
date Wed, 11 Apr 2001 15:49:31 +0000
parents d27be94466e0
children 570c667b4d1c
files lisp/eshell/em-hist.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/eshell/em-hist.el	Wed Apr 11 15:49:13 2001 +0000
+++ b/lisp/eshell/em-hist.el	Wed Apr 11 15:49:31 2001 +0000
@@ -816,7 +816,8 @@
     (if (null pos)
 	(error "Not found")
       (setq eshell-history-index pos)
-      (message "History item: %d" (- (ring-length eshell-history-ring) pos))
+      (unless (minibuffer-window-active-p (selected-window))
+	(message "History item: %d" (- (ring-length eshell-history-ring) pos)))
        ;; Can't use kill-region as it sets this-command
       (delete-region (save-excursion (eshell-bol) (point)) (point))
       (insert-and-inherit (eshell-get-history pos)))))