(fill-comment-paragraph): Obey indent-tabs-mode.
This commit is contained in:
parent
c536bb3944
commit
8b44bc0665
1 changed files with 7 additions and 3 deletions
|
@ -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…
Add table
Reference in a new issue