(sgml-html-meta-auto-coding-function): Make sure the search limit is ahead.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index aef928f431dd783bde5556db275be607c401deff..b83116ef99cac3a3dbe4049c2ac2a929ef086c65 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2008-02-12  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * international/mule.el (sgml-html-meta-auto-coding-function):
+       Make sure the search limit is ahead.
+
        * tar-mode.el: Fix broken indentation.
        (tar-mouse-extract, tar-extract, tar-subfile-save-buffer):
        Use with-current-buffer.

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index d94ba8b9a4f84ca8810a1e5c713eed7085d24ae1..c1723523b2855701ef2bae80f56e2818ce09acd9 100644 (file)
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -2297,7 +2297,7 @@ This function is intended to be added to `auto-coding-functions'."
     (setq size (min (+ (point) size)
                    (save-excursion
                      ;; Limit the search by the end of the HTML header.
-                     (or (search-forward "</head>" size t)
+                     (or (search-forward "</head>" (+ (point) size) t)
                          ;; In case of no header, search only 10 lines.
                          (forward-line 10))
                      (point))))