changeset 16543:6f891b1ba617

(map-y-or-n-p): Handle minibuffer-auto-raise here.
author Richard M. Stallman <rms@gnu.org>
date Sat, 09 Nov 1996 08:50:43 +0000
parents def7bb13a568
children 9fffc9e5fc42
files lisp/map-ynp.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/map-ynp.el	Sat Nov 09 05:44:07 1996 +0000
+++ b/lisp/map-ynp.el	Sat Nov 09 08:50:43 1996 +0000
@@ -146,6 +146,8 @@
 		       (message "%s(y, n, !, ., q, %sor %s) "
 				prompt user-keys
 				(key-description (vector help-char)))
+		       (if minibuffer-auto-raise
+			   (raise-frame (window-frame (minibuffer-window))))
 		       (setq char (read-event))
 		       ;; Show the answer to the question.
 		       (message "%s(y, n, !, ., q, %sor %s) %s"