(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 (file)
--- 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 (file)
--- 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))