]> git.eshelyaron.com Git - emacs.git/commitdiff
(sgml-html-meta-auto-coding-function):
authorJuri Linkov <juri@jurta.org>
Thu, 11 Nov 2004 21:39:41 +0000 (21:39 +0000)
committerJuri Linkov <juri@jurta.org>
Thu, 11 Nov 2004 21:39:41 +0000 (21:39 +0000)
Remove > after <html to allow HTML attributes.

lisp/international/mule.el

index f5294fea92f055640b7b4d022e767baa5fbc95ac..9136a257ee19df78137a46ff6a5604044f2ba4f2 100644 (file)
@@ -2126,7 +2126,7 @@ This function is intended to be added to `auto-coding-functions'."
                  (save-excursion
                    (forward-line 10)
                    (point))))
-  (when (and (search-forward "<html>" size t)
+  (when (and (search-forward "<html" size t)
             (re-search-forward "<meta\\s-+http-equiv=\"content-type\"\\s-+content=\"text/\\sw+;\\s-*charset=\\(.+?\\)\"" size t))
       (let* ((match (match-string 1))
             (sym (intern (downcase match))))