changeset 18617:4fb803479728

(forward-visible-line): Use forward-line, not vertical-motion, when moving backwards.
author Richard M. Stallman <rms@gnu.org>
date Fri, 04 Jul 1997 21:01:42 +0000
parents 8d93d6d7eb23
children c7a1c26b934f
files lisp/simple.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Fri Jul 04 20:56:42 1997 +0000
+++ b/lisp/simple.el	Fri Jul 04 21:01:42 1997 +0000
@@ -1189,7 +1189,7 @@
 		  (signal 'end-of-buffer nil)))
 	    (setq arg (1- arg)))
 	(while (< arg 0)
-	  (or (zerop (vertical-motion -1))
+	  (or (zerop (forward-line -1))
 	      (signal 'beginning-of-buffer nil))
 	  (while (and (not (bobp))
 		      (let ((prop