From: Gerd Moellmann <gerd@gnu.org>
Date: Mon, 19 Feb 2001 17:53:37 +0000 (+0000)
Subject: (widget-button-click): Save the selected window
X-Git-Tag: emacs-pretest-21.0.99~287
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=136b27c5716996032afb11b47b3489e1dbc2ab75;p=emacs.git

(widget-button-click): Save the selected window
around the code handling clicks on buttons.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9cdabc0f00a..1a537825820 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-02-19  Gerd Moellmann  <gerd@gnu.org>
+
+	* wid-edit.el (widget-button-click): Save the selected window
+	around the code handling clicks on buttons.
+
 2001-02-18  Dave Love  <fx@gnu.org>
 
 	* imenu.el (imenu--generic-function): Use mapc to iterate over
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index e28114eeadd..dc7e28b4ed1 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -861,7 +861,7 @@ Recommended as a parent keymap for modes using widgets.")
 	    ;; 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))