From: morioka <morioka>
Date: Fri, 2 Oct 1998 17:21:51 +0000 (+0000)
Subject: (gnus-cache-possibly-enter-article): Use `mime-fetch-field' to refer
X-Git-Tag: chaotzu-gnus-base~18
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0406c81f094c3878ec559ce7999c702281f460af;p=elisp%2Fgnus.git-

(gnus-cache-possibly-enter-article): Use `mime-fetch-field' to refer
Subject and From field for saving cache file.
---

diff --git a/lisp/gnus-cache.el b/lisp/gnus-cache.el
index 470fb21..14adbb4 100644
--- a/lisp/gnus-cache.el
+++ b/lisp/gnus-cache.el
@@ -203,8 +203,8 @@ it's not cached."
 	      ;; [number subject from date id references chars lines xref]
 	      (insert (format "%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t\n"
 			      (mail-header-number headers)
-			      (mail-header-subject headers)
-			      (mail-header-from headers)
+			      (mime-fetch-field 'Subject headers)
+			      (mime-fetch-field 'From headers)
 			      (mail-header-date headers)
 			      (mail-header-id headers)
 			      (or (mail-header-references headers) "")