changeset 9750:00490d140f2b

(line-move): Use sign of arg to choose error condition.
author Richard M. Stallman <rms@gnu.org>
date Sun, 30 Oct 1994 06:38:49 +0000
parents b2157de450ca
children 9eed4c624caa
files lisp/simple.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Sun Oct 30 02:19:14 1994 +0000
+++ b/lisp/simple.el	Sun Oct 30 06:38:49 1994 +0000
@@ -1594,7 +1594,7 @@
 		     (zerop (forward-line 1)))
 	    (and (zerop (forward-line arg))
 		 (bolp)))
-	  (signal (if (bobp)
+	  (signal (if (< arg 0)
 		      'beginning-of-buffer
 		    'end-of-buffer)
 		  nil))