From dcb8f03d8d30311a6b05585a772ae01bdeffce60 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 12 Jul 1994 00:41:10 +0000 Subject: [PATCH] (move-to-tab-stop): Delete spurious multiple definition. --- lisp/indent.el | 16 ---------------- 1 file changed, 16 deletions(-) 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. -- 2.39.5