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)]
Your message dated Tue, 18 Oct 2011 11:03:20 +0300
with message-id <87ipnmzpyv.fsf <at> mail.jurta.org>
and subject line Re: bug#9716: Patch for HTML5 auto-coding support
has caused the debbugs.gnu.org bug report #9716,
regarding Patch for HTML5 auto-coding support
to be marked as done.
(If you believe you have received this mail in error, please contact
help-debbugs <at> gnu.org.)
--
9716: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=9716
GNU Bug Tracking System
Contact help-debbugs <at> gnu.org with problems
[Message part 2 (message/rfc822, inline)]
[Message part 3 (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)]
[Message part 5 (message/rfc822, inline)]
>> that confirms that we should install the proposed patch.
>
> Fine by me,
Installed.
This bug report was last modified 13 years and 216 days ago.
Previous Next
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.