changeset 74231:0b8c05c54956

(tab-to-tab-stop, move-to-tab-stop): "?\ " -> "?\s".
author Juanma Barranquero <lekktu@gmail.com>
date Mon, 27 Nov 2006 13:53:11 +0000
parents 274336dd0ead
children 4accd8d9cc3c
files lisp/indent.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/indent.el	Mon Nov 27 13:52:27 2006 +0000
+++ b/lisp/indent.el	Mon Nov 27 13:53:11 2006 +0000
@@ -512,7 +512,7 @@
 	(let ((opoint (point)))
 	  (delete-horizontal-space t)
 	  (indent-to (car tabs)))
-      (insert ?\ ))))
+      (insert ?\s))))
 
 (defun move-to-tab-stop ()
   "Move point to next defined tab-stop column.
@@ -529,11 +529,11 @@
 	    (goto-char before)
 	    ;; If we just added a tab, or moved over one,
 	    ;; delete any superfluous spaces before the old point.
-	    (if (and (eq (preceding-char) ?\ )
+	    (if (and (eq (preceding-char) ?\s)
 		     (eq (following-char) ?\t))
 		(let ((tabend (* (/ (current-column) tab-width) tab-width)))
 		  (while (and (> (current-column) tabend)
-			      (eq (preceding-char) ?\ ))
+			      (eq (preceding-char) ?\s))
 		    (forward-char -1))
 		  (delete-region (point) before))))))))