From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 23 Oct 2005 18:26:38 +0000 (+0000)
Subject: (line-move-finish): Ignore fields computing LINE-END.
X-Git-Tag: emacs-pretest-22.0.90~6376
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a5b4a6a0435d4386362af3ee87731a7b0b3b42ed;p=emacs.git

(line-move-finish): Ignore fields computing LINE-END.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index efe1559cb4d..8fbfaffaec6 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3541,10 +3541,11 @@ Outline mode sets this."
 	     ;; Compute the end of the line
 	     ;; ignoring effectively invisible newlines.
 	     (save-excursion
-	       (end-of-line)
+	       ;; Like end-of-line but ignores fields.
+	       (skip-chars-forward "^\n")
 	       (while (and (not (eobp)) (line-move-invisible-p (point)))
 		 (goto-char (next-char-property-change (point)))
-		 (end-of-line))
+		 (skip-chars-forward "^\n"))
 	       (point))))
 
 	;; Move to the desired column.