# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1007265316 0
# Node ID 581ab0e31090ef623827fc4cae4dc11bdf9c639a
# Parent  5da2e2339b57e134d5a4c774997660e62bc66c53
(tab-to-tab-stop): Use delete-horizontal-space.

diff -r 5da2e2339b57 -r 581ab0e31090 lisp/indent.el
--- a/lisp/indent.el	Sun Dec 02 03:47:54 2001 +0000
+++ b/lisp/indent.el	Sun Dec 02 03:55:16 2001 +0000
@@ -493,8 +493,7 @@
       (setq tabs (cdr tabs)))
     (if tabs
 	(let ((opoint (point)))
-	  (skip-chars-backward " \t")
-	  (delete-region (point) opoint)
+	  (delete-horizontal-space t)
 	  (indent-to (car tabs)))
       (insert ?\ ))))