diff lisp/play/blackbox.el @ 86903:c2cad5807c15

(bb-up, bb-down): Revert 2007-10-21 change and wrap next-/previous-line in with-no-warnings.
author Martin Rudalics <rudalics@gmx.at>
date Sat, 01 Dec 2007 09:06:35 +0000
parents 0dcd1f3c9909
children 107ccd98fa12 53108e6cea98
line wrap: on
line diff
--- 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))))