changeset 69670:cdfc7cf7bfbe

(select-frame-by-name): Call x-focus-frame also when window-system is mac.
author YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
date Sat, 25 Mar 2006 07:40:18 +0000
parents 5f7de9821aeb
children e9b0a8e10992
files lisp/frame.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/frame.el	Sat Mar 25 00:55:09 2006 +0000
+++ b/lisp/frame.el	Sat Mar 25 07:40:18 2006 +0000
@@ -767,7 +767,7 @@
     (raise-frame frame)
     (select-frame frame)
     ;; Ensure, if possible, that frame gets input focus.
-    (cond ((eq window-system 'x)
+    (cond ((memq window-system '(x mac))
 	   (x-focus-frame frame))
 	  ((eq window-system 'w32)
 	   (w32-focus-frame frame)))