changeset 44508:235f5029534d

(fill-region-as-paragraph): Use save-excursion instead of relying on forward-line to bring us where we started.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 12 Apr 2002 02:56:29 +0000
parents d62ce2e3b473
children 92316652b440
files lisp/textmodes/fill.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/fill.el	Fri Apr 12 00:01:53 2002 +0000
+++ b/lisp/textmodes/fill.el	Fri Apr 12 02:56:29 2002 +0000
@@ -660,9 +660,9 @@
 		      (progn
 			(delete-horizontal-space)
 			(justify-current-line justify t t))
-		    (forward-line -1)
-		    (justify-current-line justify nil t)
-		    (forward-line 1))))))
+		    (save-excursion
+		      (forward-line -1)
+		      (justify-current-line justify nil t)))))))
 	;; Leave point after final newline.
 	(goto-char to))
       (unless (eobp)