changeset 22754:5102cb480cae

(do-auto-fill): Always break before any whitespace so that point ends up at the right place.
author Richard M. Stallman <rms@gnu.org>
date Tue, 14 Jul 1998 05:51:20 +0000
parents 4f555df67270
children 661d40b1f2f0
files lisp/simple.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Mon Jul 13 22:11:54 1998 +0000
+++ b/lisp/simple.el	Tue Jul 14 05:51:20 1998 +0000
@@ -2956,6 +2956,8 @@
 			(kinsoku (save-excursion
 				   (forward-line 0) (point))))
 		    ;; Let fill-point be set to the place where we end up.
+		    ;; But move back before any whitespace here.
+		    (skip-chars-backward " \t")
 		    (point)))))
 
 	  ;; See whether the place we found is any good.