From: Jim Blandy <jimb@redhat.com>
Date: Sat, 8 Oct 1994 22:13:15 +0000 (+0000)
Subject: * cmds.c (Fforward_line): Call scan_buffer with new args.
X-Git-Tag: emacs-19.34~6449
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4f5d0c3c26de7cb313983787aaf0c6989ed1f945;p=emacs.git

* cmds.c (Fforward_line): Call scan_buffer with new args.
(Fend_of_line): Replace call to Fforward_line and search loop with
call to find_before_next_newline.
---

diff --git a/src/cmds.c b/src/cmds.c
index 1e8ded46942..88f61234333 100644
--- a/src/cmds.c
+++ b/src/cmds.c
@@ -106,7 +106,7 @@ With positive ARG, a non-empty line at the end counts as one line\n\
     }
 
   negp = count <= 0;
-  pos = scan_buffer ('\n', pos2, count - negp, &shortage, 1);
+  pos = scan_buffer ('\n', pos2, 0, count - negp, &shortage, 1);
   if (shortage > 0
       && (negp
 	  || (ZV > BEGV
@@ -150,13 +150,7 @@ If scan reaches end of buffer, stop there without error.")
   else
     CHECK_NUMBER (n, 0);
 
-  if (XINT (n) != 1)
-    Fforward_line (make_number (XINT (n) - 1));
-
-  pos = point;
-  stop = ZV;
-  while (pos < stop && FETCH_CHAR (pos) != '\n') pos++;
-  SET_PT (pos);
+  SET_PT (find_before_next_newline (PT, 0, XINT (n) - (XINT (n) <= 0)));
 
   return Qnil;
 }