summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2008-02-12 21:21:02 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2008-02-12 21:21:02 +0000
commit9e5e233a2f9825aaf0055db72bcf900bc282d032 (patch)
tree4f3032e6047a648de1bb5730d1fd5f59cc2c9c95
parent53ad7bee3f4fe36f65121a69857b016a02aca7f7 (diff)
downloademacs-9e5e233a2f9825aaf0055db72bcf900bc282d032.tar.gz
emacs-9e5e233a2f9825aaf0055db72bcf900bc282d032.tar.bz2
emacs-9e5e233a2f9825aaf0055db72bcf900bc282d032.zip
(sgml-html-meta-auto-coding-function): Make sure the search limit is ahead.
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/international/mule.el2
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))))