Hi,
I just saw a difference between 21.4 and 21.5 about live windows. I
managed to reduce the code down to this below.
----------------------------------------------------------------------
(defun my-test (args)
(interactive "e")
(mouse-set-point current-mouse-event)
(let ((release-window (selected-window)))
(message "Window: %s" release-window)
(sit-for 1)
(read-string "### ")
(if (window-live-p release-window)
(select-window release-window)
(message "Window: %s not live" release-window)
)))
(global-set-key '(control shift button2up) 'my-test)
----------------------------------------------------------------------
Procedure: Make a split screen {C-x 2}, press (control shift button2)
in one window and then drag the mouse over to the other window and
release button2, so that a (control shift button2up) event is
generated, and my-test is executed. The result of running my-test is
that the second window is not live in 21.5 but is live in 21.4.
The intervening call to read-string, using the minibuffer, is
important for causing this difference. Maybe beeing in the minibuffer
for a while
The second window is visible all the time during this operation so how
come it is not live anymore? Is this a bug in 21.5?
Yours
--
%% Mats
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta