* bs.el (bs--down):

* ibuffer.el (ibuffer-redisplay-engine): Use `point-min' instead of 1.

3 files changed, 7 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 76d3c343f18..afed8c8471c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-02-25  Juanma Barranquero  <lekktu@gmail.com>
+
+        * bs.el (bs--down):
+        * ibuffer.el (ibuffer-redisplay-engine): Use `point-min' instead of 1.
+
 2009-02-25  Glenn Morris  <rgm@gnu.org>
 
         * dired-x.el (dired-guess-shell-alist-user): Fix doc typo.
diff --git a/lisp/bs.el b/lisp/bs.el
index 9b818e58a6e..727216c9531 100644
--- a/lisp/bs.el
+++ b/lisp/bs.el
@@ -1009,7 +1009,7 @@ If on top of buffer list go to last line."
 If at end of buffer list go to first line."
   (if (eq (line-end-position) (point-max))
       (progn
-        (goto-char 1)
+        (goto-char (point-min))
         (forward-line bs-header-lines-length))
     (forward-line 1)))
 
diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 539e925b6b7..335f410475c 100644
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -2280,7 +2280,7 @@ If optional arg SILENT is non-nil, do not display progress messages."
       (setq buffer-read-only t)
       (set-buffer-modified-p ibuffer-did-modification)
       (setq ibuffer-did-modification nil)
-      (goto-char 1)
+      (goto-char (point-min))
       (forward-line orig))))
 
 (defun ibuffer-quit ()