changeset 70113:ac1dd9b38f12

(rmail-convert-to-babyl-format): Use second group from `rmail-mime-charset-pattern'.
author Romain Francoise <romain@orebokech.com>
date Wed, 19 Apr 2006 09:55:40 +0000
parents 15278e681be3
children 29c303bc6423
files lisp/ChangeLog lisp/mail/rmail.el
diffstat 2 files changed, 7 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Wed Apr 19 06:37:31 2006 +0000
+++ b/lisp/ChangeLog	Wed Apr 19 09:55:40 2006 +0000
@@ -1,3 +1,8 @@
+2006-04-19  Romain Francoise  <romain@orebokech.com>
+
+	* mail/rmail.el (rmail-convert-to-babyl-format): Use second group
+	from `rmail-mime-charset-pattern'.
+
 2006-04-18  Dan Nicolaescu  <dann@ics.uci.edu>
 
 	* progmodes/python.el (python-mode): Fix typo.
--- a/lisp/mail/rmail.el	Wed Apr 19 06:37:31 2006 +0000
+++ b/lisp/mail/rmail.el	Wed Apr 19 09:55:40 2006 +0000
@@ -1994,7 +1994,7 @@
 					   (re-search-backward
 					    rmail-mime-charset-pattern
 					    start t))))
-				  (intern (downcase (match-string 1))))))
+				  (intern (downcase (match-string 2))))))
 			 (rmail-decode-region start (point) mime-charset)))))
 	       ;; Add an X-Coding-System: header if we don't have one.
 	       (save-excursion
@@ -2155,7 +2155,7 @@
 				       (re-search-backward
 					rmail-mime-charset-pattern
 					start t))))
-			      (intern (downcase (match-string 1))))))
+			      (intern (downcase (match-string 2))))))
 		     (rmail-decode-region start (point) mime-charset)))
 	       (save-excursion
 		 (goto-char start)