changeset 57972:fc790bd5db8f

(align-areas): Delete whitespace before reindenting, so that tabs are never placed after spaces.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 06 Nov 2004 12:04:55 +0000
parents c6da09b5384b
children 418486d3f6dd
files lisp/align.el
diffstat 1 files changed, 8 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/align.el	Sat Nov 06 11:55:32 2004 +0000
+++ b/lisp/align.el	Sat Nov 06 12:04:55 2004 +0000
@@ -1212,6 +1212,14 @@
 	      (cond ((< gocol 0) t)     ; don't do anything
 		    ((= cur gocol) t)   ; don't need to
 		    ((< cur gocol)      ; just add space
+		     ;; FIXME: It is stated above that "...the
+		     ;;	       whitespace to be modified was already
+		     ;;	       deleted by `align-region', all we have
+		     ;;	       to do here is indent."  However, this
+		     ;;	       doesn't seem to be true, so we first
+		     ;;	       delete the whitespace to avoid tabs
+		     ;;	       after spaces.
+		     (delete-horizontal-space t)
 		     (indent-to gocol))
 		    (t
 		     ;; This code works around an oddity in the