Mercurial > hg > xemacs-beta

diff lisp/indent.el @ 446:1ccc32a20af4 r21-2-38

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-38
author cvs
date Mon, 13 Aug 2007 11:37:21 +0200
parents 576fb035e263
children a634e3b7acc8
line wrap: on
line diff
--- a/lisp/indent.el	Mon Aug 13 11:36:20 2007 +0200
+++ b/lisp/indent.el	Mon Aug 13 11:37:21 2007 +0200
@@ -470,7 +470,7 @@
 		(let ((tabend (* (/ (current-column) tab-width) tab-width)))
 		  (while (and (> (current-column) tabend)
 			      (eq (char-before (point)) ?\ ))
-		    (forward-char -1))
+		    (backward-char 1))
 		  (delete-region (point) before))))))))
 
 ;(define-key global-map "\t" 'indent-for-tab-command)