Mercurial > emacs
changeset 62154:2d0b029e8560
(sgml-xml-auto-coding-function): Recognize encoding='FOO'
in single quotes as well as in double quotes.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Sat, 07 May 2005 15:53:56 +0000 |
| parents | 41d7701663fa |
| children | f1cc654dbbfb |
| files | lisp/international/mule.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule.el Sat May 07 15:46:21 2005 +0000 +++ b/lisp/international/mule.el Sat May 07 15:53:56 2005 +0000 @@ -2180,9 +2180,9 @@ (when (re-search-forward "\\`[[:space:]\n]*<\\?xml" size t) (let ((end (save-excursion ;; This is a hack. - (re-search-forward "\"\\s-*\\?>" size t)))) + (re-search-forward "[\"']\\s-*\\?>" size t)))) (when end - (if (re-search-forward "encoding=\"\\(.+?\\)\"" end t) + (if (re-search-forward "encoding=[\"']\\(.+?\\)[\"']" end t) (let* ((match (match-string 1)) (sym (intern (downcase match)))) (if (coding-system-p sym)