1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-07 20:54:32 +00:00

(fill-comment-paragraph): Obey indent-tabs-mode.

This commit is contained in:
Stefan Monnier 2004-04-04 20:18:44 +00:00
parent c536bb3944
commit 8b44bc0665

View File

@ -811,9 +811,13 @@ can take care of filling. JUSTIFY is used as in `fill-paragraph'."
(save-excursion
(goto-char comstart)
(if has-code-and-comment
(concat (make-string (/ (current-column) tab-width) ?\t)
(make-string (% (current-column) tab-width) ?\ )
(buffer-substring (point) comin))
(concat
(if (not indent-tabs-mode)
(make-string (current-column) ?\ )
(concat
(make-string (/ (current-column) tab-width) ?\t)
(make-string (% (current-column) tab-width) ?\ )))
(buffer-substring (point) comin))
(buffer-substring (line-beginning-position) comin))))
beg end)
(save-excursion