diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-02-12 21:21:02 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-02-12 21:21:02 +0000 |
commit | 9e5e233a2f9825aaf0055db72bcf900bc282d032 (patch) | |
tree | 4f3032e6047a648de1bb5730d1fd5f59cc2c9c95 | |
parent | 53ad7bee3f4fe36f65121a69857b016a02aca7f7 (diff) | |
download | emacs-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/ChangeLog | 3 | ||||
-rw-r--r-- | lisp/international/mule.el | 2 |
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)))) |