* bs.el (bs--down): When wrapping around, use `forward-line',

  not `goto-line', to avoid distracting "Mark set" message.

2 files changed, 8 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 154e91e3c64..80fc866aa27 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-02-23  Juanma Barranquero  <lekktu@gmail.com>
+
+        * bs.el (bs--down): When wrapping around, use `forward-line',
+        not `goto-line', to avoid distracting "Mark set" message.
+
 2009-02-23  Geoff Gole  <geoffgole@gmail.com>  (tiny change)
 
         * ibuffer.el (ibuffer-redisplay-engine): Avoid "Mark set" message
diff --git a/lisp/bs.el b/lisp/bs.el
index 96bad48cf2a..9b818e58a6e 100644
--- a/lisp/bs.el
+++ b/lisp/bs.el
@@ -1008,7 +1008,9 @@ If on top of buffer list go to last line."
   "Move cursor vertically down one line.
 If at end of buffer list go to first line."
   (if (eq (line-end-position) (point-max))
-      (goto-line (1+ bs-header-lines-length))
+      (progn
+        (goto-char 1)
+        (forward-line bs-header-lines-length))
     (forward-line 1)))
 
 (defun bs-visits-non-file (buffer)