GNU bug report logs -
#9716
Patch for HTML5 auto-coding support
Previous Next
Reported by: Jirka Kosek <jirka <at> kosek.cz>
Date: Mon, 10 Oct 2011 16:12:03 UTC
Severity: normal
Tags: patch
Done: Juri Linkov <juri <at> jurta.org>
Bug is archived. No further changes may be made.
Full log
View this message in rfc822 format
[Message part 1 (text/plain, inline)]
Hi,
please find attached patch that
* added support for detecting encoding in HTML5 specified only as <meta
charset=***>
Implementation just makes http-equiv and content-type parts from HTML4
encoding string optional.
Thanks,
Jirka
*** mule.el.orig/mule.el Sun May 2 21:50:16 2010
--- mule.el Mon Oct 10 17:03:16 2011
*************** This function is intended to be added to
*** 2358,2365 ****
;; (allowing for whitespace at bob). Note: 'DOCTYPE NETSCAPE' is
;; useful for Mozilla bookmark files.
(when (and (re-search-forward
"\\`[[:space:]\n]*\\(<!doctype[[:space:]\n]+\\(html\\|netscape\\)\\|<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))))
(if (coding-system-p sym)
sym
--- 2358,2366 ----
;; (allowing for whitespace at bob). Note: 'DOCTYPE NETSCAPE' is
;; useful for Mozilla bookmark files.
(when (and (re-search-forward
"\\`[[:space:]\n]*\\(<!doctype[[:space:]\n]+\\(html\\|netscape\\)\\|<html\\)"
size t)
! (re-search-forward
"<meta\\s-+\\(http-equiv=[\"']?content-type[\"']?\\s-+content=[\"']text/\\sw+;\\s-*\\)?charset=[\"']?\\(.+?\\)[\"'\\s-/>]"
size t))
!
! (let* ((match (match-string 2))
(sym (intern (downcase match))))
(if (coding-system-p sym)
sym
--
------------------------------------------------------------------
Jirka Kosek e-mail: jirka <at> kosek.cz http://xmlguru.cz
------------------------------------------------------------------
Professional XML consulting and training services
DocBook customization, custom XSLT/XSL-FO document processing
------------------------------------------------------------------
OASIS DocBook TC member, W3C Invited Expert, ISO JTC1/SC34 member
------------------------------------------------------------------
[signature.asc (application/pgp-signature, attachment)]
This bug report was last modified 13 years and 217 days ago.
Previous Next
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.