diff options
| author | Martin Rudalics <rudalics@gmx.at> | 2007-12-01 09:07:04 +0000 |
|---|---|---|
| committer | Martin Rudalics <rudalics@gmx.at> | 2007-12-01 09:07:04 +0000 |
| commit | 395bbcd318e03f1651b5057932d7713a5592acd6 (patch) | |
| tree | 550977e25a9ce2c9ed9db010a7dcaf6f41dea459 /lisp/play/blackbox.el | |
| parent | 39d0bf746693ddc92c3102f6602dfe8a9cc6db9d (diff) | |
| download | emacs-395bbcd318e03f1651b5057932d7713a5592acd6.tar.gz | |
(bb-up, bb-down): Revert 2007-10-21 change and
wrap next-/previous-line in with-no-warnings.
Diffstat (limited to 'lisp/play/blackbox.el')
| -rw-r--r-- | lisp/play/blackbox.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/play/blackbox.el b/lisp/play/blackbox.el index 699aa91abcf..48a6e4bd046 100644 --- a/lisp/play/blackbox.el +++ b/lisp/play/blackbox.el @@ -296,14 +296,14 @@ a reflection." (defun bb-up (count) (interactive "p") (while (and (> count 0) (> bb-y -1)) - (forward-line -1) + (with-no-warnings (previous-line)) (setq bb-y (1- bb-y)) (setq count (1- count)))) (defun bb-down (count) (interactive "p") (while (and (> count 0) (< bb-y 8)) - (forward-line 1) + (with-no-warnings (next-line)) (setq bb-y (1+ bb-y)) (setq count (1- count)))) |