# HG changeset patch # User Juanma Barranquero # Date 1164635591 0 # Node ID 0b8c05c54956767b4a67a0c0a3e35d7a0d04974f # Parent 274336dd0ead1ab8296376844ac34848f9da760d (tab-to-tab-stop, move-to-tab-stop): "?\ " -> "?\s". diff -r 274336dd0ead -r 0b8c05c54956 lisp/indent.el --- 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))))))))