From b379356ae173446fb7e74b51fa94aa46a8d575b7 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 27 Nov 2006 13:53:11 +0000 Subject: (tab-to-tab-stop, move-to-tab-stop): "?\ " -> "?\s". --- lisp/indent.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lisp/indent.el') 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)))))))) -- cgit v1.2.1