(line-move-finish): Inhibit field motion when computing `line-end'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index be19ba2a9dc81a8847b9ae0b8972b4b9ab75c051..fcd53795c80cb95838a9b8329f1d9eaa148bce9d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2002-06-10  Miles Bader  <miles@gnu.org>
 
+       * simple.el (line-move-finish): Inhibit field motion when
+       computing `line-end'.
+
        * files.el (revert-buffer): Correct typo: variable name is
        `buffer-file-format', not `buffer-file-formats'.
 

diff --git a/lisp/simple.el b/lisp/simple.el
index 6ae43f637703d4485507c1bd11ee180143c60e8b..9f01cef9f66865e5fe66121dc00a65d066acaba0 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -2668,7 +2668,8 @@ Outline mode sets this."
            (line-end
             ;; Compute the end of the line
             ;; ignoring effectively intangible newlines.
-            (let ((inhibit-point-motion-hooks nil))
+            (let ((inhibit-point-motion-hooks nil)
+                  (inhibit-field-text-motion t))
               (save-excursion (end-of-line) (point)))))
 
        ;; Move to the desired column.