From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 4 Jul 1997 21:03:05 +0000 (+0000)
Subject: Finish previous change.
X-Git-Tag: emacs-20.1~1328
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5c6e3aa0878490f5997990dac02cd77648d2c211;p=emacs.git

Finish previous change.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index 54674c59ea9..e85d1710953 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1201,7 +1201,7 @@ If ARG is zero, move to the beginning of the current line."
 	    (if (get-text-property (1- (point)) 'invisible)
 		(goto-char (previous-single-property-change (point) 'invisible))
 	      (goto-char (previous-overlay-change (point))))
-	    (or (zerop (vertical-motion -1))
+	    (or (zerop (forward-line -1))
 		(signal 'beginning-of-buffer nil)))
 	  (setq arg (1+ arg))))
     ((beginning-of-buffer end-of-buffer)