diff options
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/text-mode.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/textmodes/text-mode.el b/lisp/textmodes/text-mode.el index 0a721419619..404302c431f 100644 --- a/lisp/textmodes/text-mode.el +++ b/lisp/textmodes/text-mode.el @@ -147,15 +147,14 @@ This means adjusting the indentation so that it equals the distance between the end of the text and `fill-column'." (interactive) (save-excursion - (let (line-length) + (let ((lm (current-left-margin)) + line-length) (beginning-of-line) (delete-horizontal-space) (end-of-line) (delete-horizontal-space) (setq line-length (current-column)) - (beginning-of-line) - (indent-to - (+ left-margin - (/ (- fill-column left-margin line-length) 2)))))) + (indent-line-to + (+ lm (/ (- (fill-column) lm line-length) 2)))))) ;;; text-mode.el ends here |