From: Kenichi Handa <handa@m17n.org>
Date: Mon, 9 Jun 1997 12:51:42 +0000 (+0000)
Subject: (do-auto-fill): Bug fix for kinsoku processing.
X-Git-Tag: emacs-20.1~1769
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=53dcf39300d26b58088ec09ebf471878d96a8f4a;p=emacs.git

(do-auto-fill): Bug fix for kinsoku processing.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index c26e7dcc8fa..8878edcaf92 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -2619,11 +2619,11 @@ Setting this variable automatically makes it local to the current buffer."
 			   ;; Break the line at word boundary.
 			   (skip-chars-backward " \t")
 			 ;; Break the line after/before \c|.
-			 (forward-char 1)
-                         (if (and enable-kinsoku enable-multibyte-characters)
-			     (kinsoku (save-excursion
-					(forward-line 0) (point)))))))
-		   ;; Let fill-point be set to the place where we end up.
+			 (forward-char 1))))
+		   (if (and enable-kinsoku enable-multibyte-characters)
+		       (kinsoku (save-excursion
+				  (forward-line 0) (point)))))))
+	      ;; Let fill-point be set to the place where we end up.
 		   (point)))))
 	  ;; If that place is not the beginning of the line,
 	  ;; break the line there.