(pop-to-buffer): Fix misplacement of arg norecord in

call of select-window.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index db1c1b01d3d382d16ed37b2e52c3c4043238aa24..edddb877e727d1b21a4952ed85c78de9a2893264 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-10-10  Martin Rudalics  <rudalics@gmx.at>
+
+       * window.el (pop-to-buffer): Fix misplacement of arg norecord in
+       call of select-window.
+
 2008-10-10  Jay Belanger  <jay.p.belanger@gmail.com>
 
        * calc/calc.el (calc-embedded-word-regexp)

diff --git a/lisp/window.el b/lisp/window.el
index e69634de68c2665835bc472c01e4dcb54f90a69d..46f847f868663a73c61e1b6da27d93a3f3bd596e 100644 (file)
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -1063,10 +1063,10 @@ at the front of the list of recently selected ones."
        (old-frame (selected-frame))
        new-window new-frame)
     (set-buffer buffer)
-    (setq new-window (display-buffer buffer other-window) norecord)
+    (setq new-window (display-buffer buffer other-window))
     (unless (eq new-window old-window)
       ;; `display-buffer' has chosen another window, select it.
-      (select-window new-window)
+      (select-window new-window norecord)
       (setq new-frame (window-frame new-window))
       (unless (eq new-frame old-frame)
        ;; `display-buffer' has chosen another frame, make sure it gets