From 95b9ce23a17f7caa2ac647a6ad2961bbfcceeae0 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 12 Jul 1994 07:31:35 +0000 Subject: [PATCH] (buffer-menu): Call pop-to-buffer before list-buffers. Don't move point afterwards. --- lisp/buff-menu.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el index db6da4427d8..24cea7a4db2 100644 --- a/lisp/buff-menu.el +++ b/lisp/buff-menu.el @@ -163,9 +163,10 @@ Type q immediately to make the buffer menu go away and to restore previous window configuration." (interactive "P") ;;; (setq Buffer-menu-window-config (current-window-configuration)) - (list-buffers arg) + ;; This order seems to let list-buffers set the value of point + ;; regardless of whether we are using the same buffer or another. (pop-to-buffer "*Buffer List*") - (forward-line 2) + (list-buffers arg) (message "Commands: d, s, x, u; f, o, 1, 2, m, v; ~, %%; q to quit; ? for help.")) -- 2.39.5