* frame.el (select-frame-set-input-focus): Fix typo

"max" -> "mac". Do not use a single clause cond.

* frame.el (select-frame-set-input-focus): Fix typo
"max" -> "mac". Do not use a single clause cond.
2b444e1f · Dan Nicolaescu · ce00d093 · 2b444e1f · 2b444e1f
Commit 2b444e1f authored Oct 13, 2007 by Dan Nicolaescu
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 2 deletions

lisp/ChangeLog lisp/ChangeLog +3 -0

lisp/frame.el lisp/frame.el +2 -2

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
 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.


--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -820,8 +820,8 @@ the user during startup."
    (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))))