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:
parent
c536bb3944
commit
8b44bc0665
@ -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
|
||||
|
Loading…
x
Reference in New Issue
Block a user