* lisp/register.el (register-read-with-preview): Don't burp on

frame switches (e.g. due to the frame we just popped).
This commit is contained in:
Stefan Monnier 2014-05-27 10:36:07 -04:00
parent c435f506a1
commit 0da7d35c67
2 changed files with 4 additions and 1 deletions

View file

@ -1,5 +1,8 @@
2014-05-27 Stefan Monnier <monnier@iro.umontreal.ca>
* register.el (register-read-with-preview): Don't burp on
frame switches (e.g. due to the frame we just popped).
* mouse.el (mouse-set-region): Handle spurious drag events (bug#17562).
(mouse-drag-track): Annotate `mouse-drag-start' so we know we moved.

View file

@ -161,7 +161,7 @@ display such a window regardless."
collect c)))
(unwind-protect
(progn
(while (memq (read-event (propertize prompt 'face 'minibuffer-prompt))
(while (memq (read-key (propertize prompt 'face 'minibuffer-prompt))
help-chars)
(unless (get-buffer-window buffer)
(register-preview buffer 'show-empty)))