From: yamaoka <yamaoka>
Date: Sat, 15 Oct 2005 11:23:29 +0000 (+0000)
Subject: Synch to No Gnus 200510151121.
X-Git-Tag: t-gnus-6_17_4-quimby-~298
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=880420edcab455bd27eef2c5057a6a50135ced09;p=elisp%2Fgnus.git-

Synch to No Gnus 200510151121.
---

diff --git a/lisp/rfc2047.el b/lisp/rfc2047.el
index 23b6ebd..18d7b8e 100644
--- a/lisp/rfc2047.el
+++ b/lisp/rfc2047.el
@@ -833,14 +833,14 @@ derived from CHARSET."
 	  ;; succeeding encoded words.
 	  (setq e (match-beginning 0))
 	  (let ((charset (match-string 1))
-		(encoding (char-after (match-beginning 3)))
-		(word (match-string 4)))
+		(encoding (char-after (match-beginning 2)))
+		(word (match-string 3)))
 	    (delete-region e (match-end 0))
 	    (insert (rfc2047-decode-cte charset encoding word))
 	    (while (looking-at rfc2047-encoded-word-regexp)
 	      (setq charset (match-string 1)
-		    encoding (char-after (match-beginning 3))
-		    word (match-string 4))
+		    encoding (char-after (match-beginning 2))
+		    word (match-string 3))
 	      (delete-region (point) (match-end 0))
 	      (insert (rfc2047-decode-cte charset encoding word))))
 	  ;; Then decode the text encoding.