# HG changeset patch
# User Colin Walters <walters@gnu.org>
# Date 1015986686 0
# Node ID 2ce5d75bd5387e3d887f1ddbabca59753635136f
# Parent  0b8a842490f9f7b78ba453c430fb6b77d982f737
(ibuffer-redisplay-current): Don't move point when redisplaying a
line.

diff -r 0b8a842490f9 -r 2ce5d75bd538 lisp/ibuffer.el
--- a/lisp/ibuffer.el	Wed Mar 13 02:30:32 2002 +0000
+++ b/lisp/ibuffer.el	Wed Mar 13 02:31:26 2002 +0000
@@ -1585,10 +1585,11 @@
     (let ((buf (ibuffer-current-buffer)))
       (when buf
 	(let ((mark (ibuffer-current-mark)))
-	  (delete-region (point) (1+ (line-end-position)))
-	  (ibuffer-insert-buffer-line
-	   buf mark
-	   (ibuffer-current-format))
+	  (save-excursion
+	    (delete-region (point) (1+ (line-end-position)))
+	    (ibuffer-insert-buffer-line
+	     buf mark
+	     (ibuffer-current-format)))
 	  (when ibuffer-shrink-to-minimum-size
 	    (ibuffer-shrink-to-fit)))))))