From: yamaoka <yamaoka>
Date: Tue, 28 Dec 1999 07:13:58 +0000 (+0000)
Subject: (mime-edit-user-agent-value): Use `error' instead of `file-error' for the
X-Git-Tag: emiko-1_13_9~10
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=3e067088ec5b15a936f697be93a229519fdf1332;p=elisp%2Fsemi.git

(mime-edit-user-agent-value): Use `error' instead of `file-error' for the
handler of `condition-case' because XEmacs does not signal an error named
`file-error' if the required feature is not provided.
---

diff --git a/ChangeLog b/ChangeLog
index a5d69ef..607177c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,8 +1,15 @@
+1999-12-28  Katsumi Yamaoka   <yamaoka@jpl.org>
+
+	* mime-edit.el (mime-edit-user-agent-value): Use `error' instead of
+	`file-error' for the handler of `condition-case' because XEmacs
+	does not signal an error named `file-error' if the required feature
+	is not provided.
+
 1999-12-14  Akihiro Arisawa  <ari@atesoft.advantest.co.jp>
 
-	* mime-view.el (mime-preview-follow-current-entity): Fetch 
-	field of `mime-view-following-required-fields-list' from parent entity
-	if it is not exist in current entity.
+	* mime-view.el (mime-preview-follow-current-entity): Fetch field of
+	`mime-view-following-required-fields-list' from parent entity if it
+	is not exist in current entity.
 
 1999-12-13  Katsumi Yamaoka   <yamaoka@jpl.org>
 
diff --git a/mime-edit.el b/mime-edit.el
index c49d605..3eb5b08 100644
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -650,7 +650,7 @@ If it is not specified for a major-mode,
 	      (progn
 		(require 'apel-ver)
 		(concat (apel-version) " "))
-	    (file-error nil))
+	    (error nil))
 	  (if (featurep 'xemacs)
 	      (concat (cond ((featurep 'utf-2000)
 			     (concat "UTF-2000-MULE/" utf-2000-version))