diff options
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/bs.el | 1 |
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f465de81174..98c64bab784 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2006-12-24 Michaël Cadilhac <michael.cadilhac@lrde.org> | ||
| 2 | |||
| 3 | * bs.el (bs--up): Remove interactive spec. | ||
| 4 | |||
| 1 | 2006-12-24 Chong Yidong <cyd@stupidchicken.com> | 5 | 2006-12-24 Chong Yidong <cyd@stupidchicken.com> |
| 2 | 6 | ||
| 3 | * woman.el (woman-decode-buffer): Signal error for alien macro | 7 | * woman.el (woman-decode-buffer): Signal error for alien macro |
diff --git a/lisp/bs.el b/lisp/bs.el index d0b929b2d85..a42b22e8436 100644 --- a/lisp/bs.el +++ b/lisp/bs.el | |||
| @@ -999,7 +999,6 @@ Uses function `vc-toggle-read-only'." | |||
| 999 | (defun bs--up () | 999 | (defun bs--up () |
| 1000 | "Move cursor vertically up one line. | 1000 | "Move cursor vertically up one line. |
| 1001 | If on top of buffer list go to last line." | 1001 | If on top of buffer list go to last line." |
| 1002 | (interactive "p") | ||
| 1003 | (if (> (count-lines 1 (point)) bs-header-lines-length) | 1002 | (if (> (count-lines 1 (point)) bs-header-lines-length) |
| 1004 | (forward-line -1) | 1003 | (forward-line -1) |
| 1005 | (goto-char (point-max)) | 1004 | (goto-char (point-max)) |