Mercurial > emacs
changeset 44021:b2462b8e1cf2
(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'.
| author | Colin Walters <walters@gnu.org> |
|---|---|
| date | Mon, 18 Mar 2002 21:21:57 +0000 |
| parents | 784c6f7e7ed3 |
| children | 17bf646199a1 |
| files | lisp/ibuffer.el |
| diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ibuffer.el Mon Mar 18 21:21:31 2002 +0000 +++ b/lisp/ibuffer.el Mon Mar 18 21:21:57 2002 +0000 @@ -1161,7 +1161,8 @@ (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 @@ 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)