From: yamaoka <yamaoka>
Date: Sat, 24 Sep 2005 23:02:19 +0000 (+0000)
Subject: Synch to No Gnus 200509242247.
X-Git-Tag: t-gnus-6_17_4-quimby-~348
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=9d0f80311eeac36a684dd57cf381300488911fbc;p=elisp%2Fgnus.git-

Synch to No Gnus 200509242247.
---

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  <Reiner.Steib@gmx.de>
+
+	* mm-url.el (mm-url-decode-entities): Fix regexp.
+
 2005-09-20  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
 	* 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