diff options
author | Kenichi Handa <handa@m17n.org> | 1997-06-09 12:51:42 +0000 |
---|---|---|
committer | Kenichi Handa <handa@m17n.org> | 1997-06-09 12:51:42 +0000 |
commit | 7a33e1afc04b4a1c1d72f935d7fd24c5d3d2988c (patch) | |
tree | 6e3b7bd0c3c505fb2c0d4134c9d83984dc4e2409 | |
parent | a26625688a64309834d9eab91f5aa45977330913 (diff) | |
download | emacs-7a33e1afc04b4a1c1d72f935d7fd24c5d3d2988c.tar.gz |
(do-auto-fill): Bug fix for kinsoku processing.
-rw-r--r-- | lisp/simple.el | 10 |
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. |