From: shuhei <shuhei>
Date: Fri, 27 Apr 2001 13:26:23 +0000 (+0000)
Subject: (mime-entity-read-field): Would capitalize twice.
X-Git-Tag: flim-1_14-rfc2231-merged~4
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=979aecf45fb798be76c728bfc7766fcd4360c9f2;p=elisp%2Fflim.git

(mime-entity-read-field): Would capitalize twice.
---

diff --git a/mime.el b/mime.el
index 56bdb1b..005790e 100644
--- a/mime.el
+++ b/mime.el
@@ -332,7 +332,7 @@ default value."
 		 (prog1
 		     field-name
 		   (setq field-name (symbol-name field-name)))
-	       (intern (capitalize (capitalize field-name))))))
+	       (intern (capitalize field-name)))))
     (cond ((eq sym 'Content-Type)
 	   (mime-entity-content-type entity)
 	   )