From: Richard M. Stallman Date: Tue, 12 Jul 1994 00:41:10 +0000 (+0000) Subject: (move-to-tab-stop): Delete spurious multiple definition. X-Git-Tag: emacs-19.34~7645 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dcb8f03d8d30311a6b05585a772ae01bdeffce60;p=emacs.git (move-to-tab-stop): Delete spurious multiple definition. --- diff --git a/lisp/indent.el b/lisp/indent.el index ef63db81932..f869b175f75 100644 --- a/lisp/indent.el +++ b/lisp/indent.el @@ -244,22 +244,6 @@ Use \\[edit-tab-stops] to edit them interactively." (indent-to (car tabs))) (insert ?\ )))) -(defun move-to-tab-stop () - "Move point to next defined tab-stop column. -The variable `tab-stop-list' is a list of columns at which there are tab stops. -Use \\[edit-tab-stops] to edit them interactively." - (interactive) - (let ((tabs tab-stop-list)) - (while (and tabs (>= (current-column) (car tabs))) - (setq tabs (cdr tabs))) - (if tabs - (progn - (if (eq last-command 'move-to-tab-stop) - (let ((opoint (point))) - (skip-chars-backward " \t") - (delete-region (point) opoint))) - (move-to-column (car tabs) t))))) - (defun move-to-tab-stop () "Move point to next defined tab-stop column. The variable `tab-stop-list' is a list of columns at which there are tab stops.