# HG changeset patch # User Martin Rudalics # Date 1196499995 0 # Node ID c2cad5807c15afb80a62a43134538c6979668857 # Parent 6787c1b3cc6e62dd17f8b278e0a82efdf43c0c7d (bb-up, bb-down): Revert 2007-10-21 change and wrap next-/previous-line in with-no-warnings. diff -r 6787c1b3cc6e -r c2cad5807c15 lisp/play/blackbox.el --- a/lisp/play/blackbox.el Sat Dec 01 06:59:12 2007 +0000 +++ b/lisp/play/blackbox.el Sat Dec 01 09:06:35 2007 +0000 @@ -296,14 +296,14 @@ (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))))