From 9d0f80311eeac36a684dd57cf381300488911fbc Mon Sep 17 00:00:00 2001 From: yamaoka Date: Sat, 24 Sep 2005 23:02:19 +0000 Subject: [PATCH] Synch to No Gnus 200509242247. --- lisp/ChangeLog | 4 ++++ lisp/mm-url.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3efae66..fade19c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -32,6 +32,10 @@ (spam-report-gmane): changed to take a single article and do unspam registration +2005-09-19 Reiner Steib + + * mm-url.el (mm-url-decode-entities): Fix regexp. + 2005-09-20 Lars Magne Ingebrigtsen * gnus-agent.el (gnus-agent-synchronize-flags): Switch the diff --git a/lisp/mm-url.el b/lisp/mm-url.el index 9f9c560..fe52b5d 100644 --- a/lisp/mm-url.el +++ b/lisp/mm-url.el @@ -365,7 +365,7 @@ If FOLLOW-REFRESH is non-nil, redirect refresh url in META." (defun mm-url-decode-entities () "Decode all HTML entities." (goto-char (point-min)) - (while (re-search-forward "&\\(#[0-9]+\\|[a-z]+\\);" nil t) + (while (re-search-forward "&\\(#[0-9]+\\|[a-z]+[0-9]*\\);" nil t) (let ((elem (if (eq (aref (match-string 1) 0) ?\#) (let ((c (string-to-number (substring -- 1.7.10.4