Mercurial > emacs

changeset 54701:1abda8ef8f22

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(fill-comment-paragraph): Obey indent-tabs-mode.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sun, 04 Apr 2004 20:18:44 +0000
parents 677905e471e2
children 1ee1cc05559b
files lisp/textmodes/fill.el
diffstat 1 files changed, 7 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/fill.el	Sun Apr 04 12:56:01 2004 +0000
+++ b/lisp/textmodes/fill.el	Sun Apr 04 20:18:44 2004 +0000
@@ -811,9 +811,13 @@
 	      (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