From: ueno <ueno>
Date: Wed, 6 Mar 2002 04:21:08 +0000 (+0000)
Subject: * mime-view.el (mime-view-read-charset): Remove redundant checking for
X-Git-Tag: emiko-1_14-epg-branchpoint~56
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=fd1237e14ea9f80365af6ed7bbf1a6bebf8d1f1b;p=elisp%2Fsemi.git

* mime-view.el (mime-view-read-charset): Remove redundant checking for
sanity when reading MIME-charset.
[cf. <emacs-mime-ja:995>]
---

diff --git a/mime-view.el b/mime-view.el
index 4cedeff..aae1f93 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -1800,7 +1800,7 @@ If LINES is negative, scroll up LINES lines."
 					(lambda (sym)
 					  (list (symbol-name sym)))
 					(mime-charset-list))
-				       #'mime-charset-p t
+				       nil t
 				       (symbol-name default-charset)))))
 	(unless (eq charset default-charset)
 	  charset))