changeset 47679:96093793b6b4

(sgml-guess-indent): Handle tabs correctly.
author Mike Williams <mdub@bigfoot.com>
date Sun, 29 Sep 2002 05:59:10 +0000
parents f1df4ce59b0b
children 0a3cdee0c29f
files lisp/textmodes/sgml-mode.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/sgml-mode.el	Sun Sep 29 05:20:51 2002 +0000
+++ b/lisp/textmodes/sgml-mode.el	Sun Sep 29 05:59:10 2002 +0000
@@ -1288,7 +1288,7 @@
     (if (re-search-forward "^\\([ \t]+\\)<" 500 'noerror)
         (progn
           (set (make-local-variable 'sgml-basic-offset)
-               (length (match-string 1)))
+               (1- (current-column)))
           (message "Guessed sgml-basic-offset = %d"
                    sgml-basic-offset)
           ))))