changeset 36204:cd2b4630c74d

(widget-button-click): Save the selected window around the code handling clicks on buttons.
author Gerd Moellmann <gerd@gnu.org>
date Mon, 19 Feb 2001 17:53:04 +0000
parents 357e372545a5
children 66990eb59514
files lisp/wid-edit.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/wid-edit.el	Mon Feb 19 16:44:07 2001 +0000
+++ b/lisp/wid-edit.el	Mon Feb 19 17:53:04 2001 +0000
@@ -861,7 +861,7 @@
 	    ;; Mouse click on a widget button.  Do the following
 	    ;; in a save-excursion so that the click on the button
 	    ;; doesn't change point.
-	    (progn
+	    (save-selected-window
 	      (save-excursion
 		(mouse-set-point event)
 		(let* ((overlay (widget-get button :button-overlay))