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

[bpt/emacs.git] / lisp / international / mule.el

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index d94ba8b..c172352 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))))