X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Ftext-mode.el;h=18b4e2d32e5464b983ccd63abba1a9b8853c4a92;hb=2e3cb02e20b751359c415843893f02e7a1d4639f;hp=8bbd5a442f424cd0ec7e3399eec4b9966f2efae9;hpb=c879e5b17b3d5fef34ab58fc66e1cbb4269e5bb4;p=sxemacs diff --git a/lisp/text-mode.el b/lisp/text-mode.el index 8bbd5a4..18b4e2d 100644 --- a/lisp/text-mode.el +++ b/lisp/text-mode.el @@ -176,7 +176,7 @@ The argument NLINES says how many lines to center." (delete-horizontal-space) (setq line-length (current-column)) (if (> (- fill-column lm line-length) 0) - (indent-line-to + (indent-line-to (+ lm (/ (- fill-column lm line-length) 2)))))) (cond ((null nlines) (setq nlines 0))