# HG changeset patch # User Richard M. Stallman # Date 773998295 0 # Node ID e82a71b09d7ac3d4cdc70d70ebef778c187facb9 # Parent e03e94b14ba4b70aaf37f22bd8cb58478134c971 (buffer-menu): Call pop-to-buffer before list-buffers. Don't move point afterwards. diff -r e03e94b14ba4 -r e82a71b09d7a lisp/buff-menu.el --- a/lisp/buff-menu.el Tue Jul 12 07:25:31 1994 +0000 +++ b/lisp/buff-menu.el Tue Jul 12 07:31:35 1994 +0000 @@ -163,9 +163,10 @@ 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."))