From 8b44bc06654a63aa661c837c29b6ea261b35a156 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sun, 4 Apr 2004 20:18:44 +0000 Subject: [PATCH] (fill-comment-paragraph): Obey indent-tabs-mode. --- lisp/textmodes/fill.el | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el index 2ac09f11256..aaa10fbce5f 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el @@ -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 -- 2.39.5