Mercurial > emacs

changeset 8208:7ad755e38ee3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(move-to-tab-stop): Delete spurious multiple definition.
author Richard M. Stallman <rms@gnu.org>
date Tue, 12 Jul 1994 00:41:10 +0000
parents 96e6518c209b
children 80bf9bcff5c6
files lisp/indent.el
diffstat 1 files changed, 0 insertions(+), 16 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/indent.el	Tue Jul 12 00:35:27 1994 +0000
+++ b/lisp/indent.el	Tue Jul 12 00:41:10 1994 +0000
@@ -253,22 +253,6 @@
     (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.
-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
 	(let ((before (point)))
 	  (move-to-column (car tabs) t)
 	  (save-excursion