diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2006-11-27 13:53:11 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2006-11-27 13:53:11 +0000 |
| commit | b379356ae173446fb7e74b51fa94aa46a8d575b7 (patch) | |
| tree | 5c933f70792e31b01c1086b27a813093b838b9a9 /lisp/indent.el | |
| parent | 94318c8a1f10a32eed7dc58fe03c09ff0daccd97 (diff) | |
| download | emacs-b379356ae173446fb7e74b51fa94aa46a8d575b7.tar.gz | |
(tab-to-tab-stop, move-to-tab-stop): "?\ " -> "?\s".
Diffstat (limited to 'lisp/indent.el')
| -rw-r--r-- | lisp/indent.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/indent.el b/lisp/indent.el index ee3eea8d901..38b509b849c 100644 --- a/lisp/indent.el +++ b/lisp/indent.el @@ -512,7 +512,7 @@ Use \\[edit-tab-stops] to edit them interactively." (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 @@ Use \\[edit-tab-stops] to edit them interactively." (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)))))))) |