[Emacs-diffs] trunk r115210: Scroll correct window when showing completion options.

[Jorgen Schäfer]

------------------------------------------------------------
revno: 115210
revision-id: address@hidden
parent: address@hidden
committer: Jorgen Schaefer <address@hidden>
branch nick: trunk
timestamp: Sun 2013-11-24 15:08:02 +0100
message:
  Scroll correct window when showing completion options.
  
  * minibuffer.el (completion--in-region-1): Scroll the correct
  window. (Bug#13898)
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/minibuffer.el             
minibuffer.el-20091113204419-o5vbwnq5f7feedwu-8622

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-11-24 09:31:51 +0000
+++ b/lisp/ChangeLog    2013-11-24 14:08:02 +0000
@@ -1,3 +1,8 @@
+2013-11-24  Jorgen Schaefer  <address@hidden>
+
+       * minibuffer.el (completion--in-region-1): Scroll the correct
+       window. (Bug#13898)
+
 2013-11-24  Bozhidar Batsov  <address@hidden>
 
        * emacs-lisp/helpers.el: Add some string helpers.

=== modified file 'lisp/minibuffer.el'
--- a/lisp/minibuffer.el        2013-10-04 02:12:16 +0000
+++ b/lisp/minibuffer.el        2013-11-24 14:08:02 +0000
@@ -1067,7 +1067,8 @@
             ;; If end is in view, scroll up to the beginning.
             (set-window-start window (point-min) nil)
           ;; Else scroll down one screen.
-          (scroll-other-window))
+          (with-selected-window window
+           (scroll-up)))
         nil)))
    ;; If we're cycling, keep on cycling.
    ((and completion-cycling completion-all-sorted-completions)