# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1192294236 0
# Node ID d0de3022445da9743ea4f2d56e988b4572b02a6f
# Parent  46b60051ddcc010356f17bd7c2742ebc4cbd73f2
* frame.el (select-frame-set-input-focus): Fix typo
"max" -> "mac". Do not use a single clause cond.

diff -r 46b60051ddcc -r d0de3022445d lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Oct 13 16:36:05 2007 +0000
+++ b/lisp/ChangeLog	Sat Oct 13 16:50:36 2007 +0000
@@ -1,5 +1,8 @@
 2007-10-13  Dan Nicolaescu  <dann@ics.uci.edu>
 
+	* frame.el (select-frame-set-input-focus): Fix typo
+	"max" -> "mac". Do not use a single clause cond.
+
 	* cus-start.el (all): Use test that does not match the X11 version
 	for mac.
 
diff -r 46b60051ddcc -r d0de3022445d lisp/frame.el
--- a/lisp/frame.el	Sat Oct 13 16:36:05 2007 +0000
+++ b/lisp/frame.el	Sat Oct 13 16:50:36 2007 +0000
@@ -820,8 +820,8 @@
     (select-frame frame)
     (raise-frame frame)
     ;; Ensure, if possible, that frame gets input focus.
-    (cond ((memq (window-system frame) '(x max w32))
-	   (x-focus-frame frame)))
+    (when (memq (window-system frame) '(x mac w32))
+	   (x-focus-frame frame))
     (cond (focus-follows-mouse
 	   (set-mouse-position (selected-frame) (1- (frame-width)) 0))))