From: morioka <morioka>
Date: Sun, 25 Oct 1998 12:02:17 +0000 (+0000)
Subject: (eword-encode-field-body): fixed typo.
X-Git-Tag: flim-1_11_2~19
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=62c522bd7b50697d626cd3fb8df1ca7d36ce28f7;p=elisp%2Fflim.git

(eword-encode-field-body): fixed typo.
---

diff --git a/eword-encode.el b/eword-encode.el
index 82db688..fb068f1 100644
--- a/eword-encode.el
+++ b/eword-encode.el
@@ -604,7 +604,7 @@ encoded-word.  ASCII token is not encoded."
 	  (setq start (+ (length (symbol-name field-name)) 2))
 	(setq start (+ (length field-name) 2)
 	      field-name (intern (capitalize field-name)))
-	(cond ((memq field-name-symbol
+	(cond ((memq field-name
 		     '(Reply-To
 		       From Sender
 		       Resent-Reply-To Resent-From
@@ -613,10 +613,10 @@ encoded-word.  ASCII token is not encoded."
 		       Dcc))
 	       (eword-encode-address-list field-body start)
 	       )
-	      ((eq field-name-symbol 'In-Reply-To)
+	      ((eq field-name 'In-Reply-To)
 	       (eword-encode-in-reply-to field-body start)
 	       )
-	      ((memq field-name-symbol '(Mime-Version User-Agent))
+	      ((memq field-name '(Mime-Version User-Agent))
 	       (eword-encode-structured-field-body field-body start)
 	       )
 	      (t