From 7f7a90f31dac5c4e08dead0c4c8b2fa84e669e73 Mon Sep 17 00:00:00 2001 From: tomo Date: Fri, 30 Jun 2000 06:03:44 +0000 Subject: [PATCH] (mime-entity-read-field): Fix a bug when FIELD-NAME is a string. --- mime.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mime.el b/mime.el index 0f9ea4a..328d599 100644 --- a/mime.el +++ b/mime.el @@ -321,7 +321,7 @@ If MESSAGE is specified, it is regarded as root entity." (prog1 field-name (setq field-name (symbol-name field-name))) - (capitalize (capitalize field-name))))) + (intern (capitalize (capitalize field-name)))))) (cond ((eq sym 'Content-Type) (mime-entity-content-type entity) ) -- 1.7.10.4