From 02fc092780f71216abfd76373ada0a55676e57e1 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Sat, 7 Dec 1996 20:31:38 +0000
Subject: (isearch-mode): Maybe make minibuffer frame visible and/or raise it.

---
 lisp/isearch.el | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/lisp/isearch.el b/lisp/isearch.el
index c48c141310a..1da6f0d9f65 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -467,6 +467,14 @@ is treated as a regexp.  See \\[isearch-forward] for more info."
   (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)
 
-- 
cgit v1.2.1