From 559ac4c15da993e016c25b1810a35646e9b463e5 Mon Sep 17 00:00:00 2001 From: Colin Walters Date: Mon, 18 Mar 2002 21:21:57 +0000 Subject: [PATCH] (ibuffer-set-mark): Go back to the beginning of the line after setting the mark. (ibuffer-insert-buffers-and-marks): Invert the test for `ibuffer-sorting-reversep'. --- lisp/ibuffer.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el index afcd35370de..bee8701ef8c 100644 --- a/lisp/ibuffer.el +++ b/lisp/ibuffer.el @@ -1161,7 +1161,8 @@ become unmarked." (let ((inhibit-read-only t)) (ibuffer-set-mark-1 mark) (setq ibuffer-did-modification t) - (ibuffer-redisplay-current))) + (ibuffer-redisplay-current) + (beginning-of-line))) (defun ibuffer-set-mark-1 (mark) (let ((beg (line-beginning-position)) @@ -1951,8 +1952,8 @@ Do not display messages if SILENT is non-nil." bmarklist))) ;; perhaps reverse the sorted buffer list (if ibuffer-sorting-reversep - result - (nreverse result)))))) + (nreverse result) + result))))) (dolist (entry entries) (ibuffer-insert-buffer-line (car entry) -- 2.39.2