From 5c6e3aa0878490f5997990dac02cd77648d2c211 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 4 Jul 1997 21:03:05 +0000 Subject: [PATCH] Finish previous change. --- lisp/simple.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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) -- 2.39.2