Mercurial > emacs
changeset 16620:c3a095290ec4
(isearch-mode): Maybe make minibuffer frame visible and/or raise it.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 07 Dec 1996 20:31:38 +0000 |
| parents | 4f8448158c10 |
| children | 042bf1d82a14 |
| files | lisp/isearch.el |
| diffstat | 1 files changed, 8 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/isearch.el Sat Dec 07 20:30:18 1996 +0000 +++ b/lisp/isearch.el Sat Dec 07 20:31:38 1996 +0000 @@ -467,6 +467,14 @@ (setq isearch-window-configuration (if isearch-slow-terminal-mode (current-window-configuration) nil)) + ;; Maybe make minibuffer frame visible and/or raise it. + (let ((frame (window-frame (minibuffer-window)))) + (if (not (memq (frame-live-p frame) '(nil t))) + (progn + (make-frame-visible frame) + (if minibuffer-auto-raise + (raise-frame frame))))) + (setq isearch-mode " Isearch") ;; forward? regexp? (force-mode-line-update)