mouse click into window doesn't always select frame

[David Reitter]

With an emacs -Q and the following code:

(let ((f (selected-frame))
      (pop-up-frames t))
  (pop-to-buffer "*Messages*")
  (raise-frame f))

... I can get to a state where clicking into the original frame (f)  
does not shift the input focus to that frame and the appropriate  
window. It only sets the point to a new position.

I would expect the frame to be selected and the input focus set.


(This occurs frequently for me when using pop-up-frames with `display- 
buffer-reuse-frames' set to t, but I believe that particular behavior  
may depend on patches, so it's easier just to consider the minimal  
example above.)







In GNU Emacs 22.0.91.1 (powerpc-apple-darwin7.9.0, Carbon Version 1.6.0)
 of 2006-12-10 on rodrigues.inf.ed.ac.uk
X server distributor `Apple Computers', version 10.4.8
configured using `configure '--without-x' '--prefix=/usr/local''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: nil
  locale-coding-system: iso-8859-1
  default-enable-multibyte-characters: t

Major mode: Emacs-Lisp

Minor modes in effect:
  encoded-kbd-mode: t
  tooltip-mode: t
  mac-input-method-mode: t
  tool-bar-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  auto-compression-mode: t
  line-number-mode: t

Recent input:
<down> <down> <down> <right> C-x C-e <switch-frame>
<switch-frame> <help-echo> <help-echo> <help-echo>
<down-mouse-1> <mouse-movement> <mouse-1> C-k <down>
<down> <backspace> <down> C-k C-k C-k ) C-x C-e <switch-frame>
<switch-frame> <down-mouse-1> <mouse-1> <up> <right>
; <down> <down> C-x C-e <switch-frame> <down-mouse-1>
<mouse-movement> <mouse-1> <down-mouse-1> <mouse-1>
<down-mouse-1> <mouse-1> <down-mouse-1> <mouse-1> <up>
<up> <right> <backspace> <backspace> <backspace> <backspace>
<backspace> ) <return> <tab> <right> <delete> <delete>
<delete> <delete> <delete> C-e ) <right> <tab> <down>
<left> C-k C-k C-k <tab> <down> <left> <backspace>
<right> C-x C-e <switch-frame> <down-mouse-1> <mouse-movement>
<mouse-1> <down-mouse-1> <mouse-1> <down-mouse-1> <mouse-movement>
<mouse-1> <down-mouse-1> <mouse-movement> <mouse-1>
<double-down-mouse-1> <double-mouse-1> <help-echo>
<tool-bar> <copy> <help-echo> <menu-bar> <help-menu>
<report-emacs-bug>

Recent messages:
t
#<buffer *Messages*> [2 times]
nil
#<frame *scratch* 0xa1a150> [2 times]
nil
#<frame *scratch* 0xa1a150>
nil [3 times]
Loading emacsbug...
Loading regexp-opt...done
Loading emacsbug...done