diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2009-02-23 15:27:40 +0000 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2009-02-23 15:27:40 +0000 |
commit | 936934f5e0c72c1427eb783a5746ddbec519bfda (patch) | |
tree | 4c11bb7eeff3b0159008cef25f0b600f237ca1dc /lisp/bs.el | |
parent | 3deb93c663738615ef54366eef53162fd4fa6c2a (diff) | |
download | emacs-936934f5e0c72c1427eb783a5746ddbec519bfda.tar.gz |
* bs.el (bs--down): When wrapping around, use `forward-line',
not `goto-line', to avoid distracting "Mark set" message.
Diffstat (limited to 'lisp/bs.el')
-rw-r--r-- | lisp/bs.el | 4 |
1 files changed, 3 insertions, 1 deletions
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) |