summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1997-06-09 12:51:42 +0000
committerKenichi Handa <handa@m17n.org>1997-06-09 12:51:42 +0000
commit7a33e1afc04b4a1c1d72f935d7fd24c5d3d2988c (patch)
tree6e3b7bd0c3c505fb2c0d4134c9d83984dc4e2409
parenta26625688a64309834d9eab91f5aa45977330913 (diff)
downloademacs-7a33e1afc04b4a1c1d72f935d7fd24c5d3d2988c.tar.gz
(do-auto-fill): Bug fix for kinsoku processing.
-rw-r--r--lisp/simple.el10
1 files changed, 5 insertions, 5 deletions
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.