Mercurial > hg > xemacs-beta

diff lisp/indent.el @ 412:697ef44129c6 r21-2-14

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-14
author cvs
date Mon, 13 Aug 2007 11:20:41 +0200
parents 74fd4e045ea6
children 11054d720c21
line wrap: on
line diff
--- a/lisp/indent.el	Mon Aug 13 11:19:22 2007 +0200
+++ b/lisp/indent.el	Mon Aug 13 11:20:41 2007 +0200
@@ -93,7 +93,7 @@
   (back-to-indentation)
   (let ((cur-col (current-column)))
     (cond ((< cur-col column)
-	   (if (>= (- column (* (/ cur-col tab-width) tab-width)) tab-width)
+	   (if (> (- column (* (/ cur-col tab-width) tab-width)) tab-width)
 	       (delete-region (point)
 			      (progn (skip-chars-backward " ") (point))))
 	   (indent-to column))