From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 7 Jul 1994 05:07:02 +0000 (+0000)
Subject: (switch-to-buffer-other-frame): Raise the frame.
X-Git-Tag: emacs-19.34~7688
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=336b7f41606b57bbfe0e7bc1530cd14d44009821;p=emacs.git

(switch-to-buffer-other-frame): Raise the frame.
---

diff --git a/lisp/files.el b/lisp/files.el
index 2ccfa29d135..ed6bb39cafd 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -443,7 +443,8 @@ unlike `file-truename'."
   "Switch to buffer BUFFER in another frame."
   (interactive "BSwitch to buffer in other frame: ")
   (let ((pop-up-frames t))
-    (pop-to-buffer buffer t)))
+    (pop-to-buffer buffer t)
+    (raise-frame (window-frame (selected-window)))))
 
 (defun find-file (filename)
   "Edit file FILENAME.