From: Mike Williams <mdub@bigfoot.com>
Date: Wed, 22 May 2002 09:40:48 +0000 (+0000)
Subject: (sgml-guess-indent): Look further into the buffer.
X-Git-Tag: ttn-vms-21-2-B4~14918
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=232dbe4f66c1cf38a9c42f4d598412cc6dc02fc0;p=emacs.git

(sgml-guess-indent): Look further into the buffer.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6ec410602e6..a35caa9d765 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-05-22  Mike Williams  <mdub@bigfoot.com>
+
+	* textmodes/sgml-mode.el (sgml-guess-indent): Look further into
+	the buffer.
+
 2002-05-21  Markus Rost  <rost@math.ohio-state.edu>
 
 	* lpr.el: Fix typo in Commentary section.
diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el
index 58aec14b48b..a9e13c7c491 100644
--- a/lisp/textmodes/sgml-mode.el
+++ b/lisp/textmodes/sgml-mode.el
@@ -1235,7 +1235,7 @@ Add this to `sgml-mode-hook' for convenience."
   (interactive)
   (save-excursion
     (goto-char (point-min))
-    (if (re-search-forward "^\\([ \t]+\\)<" 100 'noerror)
+    (if (re-search-forward "^\\([ \t]+\\)<" 500 'noerror)
         (progn
           (set (make-local-variable 'sgml-basic-offset)
                (length (match-string 1)))