Fix last change to with-selected-window.

* subr.el (with-selected-window): Fix last change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d57c3f8b61abf9d1a4ec0f250b65bf6f33d13739..79ea1e0bdd4e3de4b61ff39a31ae2644a8b379d3 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2012-08-13  Martin Rudalics  <rudalics@gmx.at>
+
+       * subr.el (with-selected-window): Fix last change.
+
 2012-08-12  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * subr.el (internal--before-with-seleted-window)

diff --git a/lisp/subr.el b/lisp/subr.el
index 34c0a78093032678282d95ae9dfebd2503fd3d54..2fd322dc77e6d81d056abbc884a6397759e7e304 100644 (file)
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -3070,7 +3070,7 @@ the buffer list ordering."
        (unwind-protect
            (progn (select-window (car save-selected-window--state) 'norecord)
                  ,@body)
-         (internal--before-with-seleted-window save-selected-window--state)))))
+         (internal--after-with-seleted-window save-selected-window--state)))))
 
 (defmacro with-selected-frame (frame &rest body)
   "Execute the forms in BODY with FRAME as the selected frame.