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

2 files changed, 4 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index aef928f431d..b83116ef99c 100644
--- 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 d94ba8b9a4f..c1723523b28 100644
--- 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))))